«0- 11182  424 
UNCLASSIFIED 


TSAR  (THEATER  SIMULATION  OF  AIRBASE  RESOURCES)  OUTPUT  1/1 
PROCESSOR  OOCUNENTATION(U)  ORLANDO  TECHNOLOQV  INC 
SHALIHAR  FL  R  LANARCHE  ET  AL.  29  HAV  B7 

F/O  15/5  NL 


MICROCOPY  RESOLUTION  TEST  CHART 

NATIONAL  BUREAU  OF  STANDARDSJ963-A  ^ 


1*  REFORT  SECURITY  CLASSIFICATION 


2»  SECURITY  CLASSIFICATION  AUTHORITY 


3b.  occlassification/oovynoraoing  schedule 


4.  ferforming  organization  refort  numseris) 


REPORT  DOCUMENTATION  PAGE 


ib.  restrictive  markings 


3.  distribution/availability  of  refort 

Unlimited  Distribution 


5.  MONITORING  ORGANIZATION  REFORT  NUMBERIS) 


•a  NAME  OF  FERFORMING  ORGANIZATION 

Orlando  Technology,  Inc. 


Sc.  AOORESS  (City.  SUM  and  ZIP  CotUl 

P.0.  Box  855 
Shalimar,  Florida  32579 


b.  OFFICE  SYMBOL 
(IfopoUtobln 


Sb.  NAME  OF  FUNOING/SFONSORING 
ORGANIZATION  ^  Center 

8b.  OFFICE  SYMBOL 
(If  appUeablrl 

for  Studies  and  Analyses 

AFCSA/SAGP 

Sc  AOORESS  iCtty.  Stair  and  ZIP  Code 1 

AFCSA/SAGP 

Pentagon,  1C 370 

Washington  DC  20330-5420 

11  TITLE  /tacJud*  Security  Ci«tti/iC4f<on>  fSAR  F"4£t  F“16t  F”15 
TSAR  Output  Processor  Docuiaentation 

7a  NAME  OF  MONITORING  ORGANIZATION 

Tactical  Supjiort  Division 

Air  Force  Center  for  Studies  and  Analyses 


7b.  AOORESS  (City.  Stale  and  ZIP  CotUl 

AFCSA/SAGP 
Pentagon,  Rm  1C370 
Washington  DC  20330-5420 


0.  FROCUREMENT  INSTRUMENT  IDENTIFICATION  NUM6E  R 


10.  SOURCE  OF  FUNDING  NOS 


PROJECT 

TASK  1 

WORK  UNIT 

NO 

NO 

) 

NO 

13.  FERSONAL  AUTHORISI 

Robert  Lamarche.  Cliff  Gornto 


13a  TYFE  of  REFORT  13b.  time  COVEREO 

Final  frqm8/1/85  tq7/ 31/86 


14  OATE  OF  REFORT  (Vr.  Mo..  Doyl 

870417 


IB  FAGE  COUNT 


COSAT  I  COOES 


It  SUBJECT  TERMS  fContu im  on  r*v*r$*  if  necemory  end  identify  by  fcloc*  n* 

TSAR,  Simulation,  Sortie  Generation,  Logistics, 
Capability  Assessment,  Support,  Craphlcs.  ^ 


IB.  ABSTRACT  (Continue  on  reuerte  if  neceemry  end  identify  By  dtock  mumderi 

A  significant  problem  for  analysts  and  simulation  model  users  is  presenting  output  data  in 
convenient  form.  The  Theater  Simulation  of  Airbase  Resources  foSAR)  model  is  no  exception. 
This  TSAR  document  provides  users  with  options  for  generating  data  outputs  in  a  format 
which  can  be  directly  input  into  standardised  analytic  software  packages.  TSAR  Implement¬ 
ation  code  is  listed  and  sample  analytic  and  graphic  procedures  illustrate  the  use  of 
various  options,  i 


20  ?;ST  m.  ruT'ON  Av  AiLABMJ  T  v  OP  ABSTRACT 

21  ABSTRACT  SECURITY  CLASS'*  .CA  T  ion 

UHu»y.  '  to  iiuM.Tio  J  SAME  AS  RFT  □  OTlC  USERS  □ 

UNCLASSIFIED 

73a  UME'qF  AESFONS.BLt  INUiviOuAl 

77t)  TELEPHONE  NUMBER 

22c  OPE  (Cf  SvMBOl 

/  .  . 

‘Ineiudt  4  ree  (  i*4r  > 

LtCo l  Salvatore  R.  Boaco 

(202)  697-0862 

AFCSA/SACR 

DO  FORM  1473.  83  APR 


EDITION  OF  1  JAN  73  IS  OSSOLi  TE 


UNCLASS IFIED  _ 

SECURITY  Cl  ASS  if  ICATiON  OF  THIS  FAGE 


PREFACE 


I 


The  Assistant  Chief  of  Stsff  for  Studies  and  Analyses  (AF/SA)  has  a  continuing 
requirement  for  investigations  into  advanced  fighter  aircraft  operations  and 
support  topics.  A  recurring  need  Involves  studies  of  readiness,  survivability, 
and  sustainability.  Several  aethodologies  have  been  used  over  the  years.  The 
current  iit*t«“of“the-art>  techniques  for  these  purposes  are  two  Monte  Carlo 
simulation  models  developed  in  the  late  1970s  by  The  Rand  Corporation,  Theater 
Simulation  of  Airbase  Resources  (TSAR)  and  TSAR  Inputs  using  Airbase  Damage 
Assessment  (TSARINA).  These  models,  like  other  simulation  models,  are  builf  to 
study  and  analyze  a  system's  processes.  >  In  this  case  the  “system"  is  the 
collection  of  resources  called  an  airbase  and  the  process  of  interest  is  the 
Interaction  of  those  resources  resulting  in  the  generation  of  aircraft  sorties. 
A  system's  problem  can  often  be  described  and  studied  through  “what  if”  excur¬ 
sions  about  a  defined  base  case.  The  base  case  and  the  excursions  of  interest 
could  be  viewed  as  related  problem  scenarios.  In  both  TSAR  and  TSARINA  the 
scenario  to  be  studied  Is  modeled  through  the  database.  Therefore  the  analyst 
must  know  the  logic  embodied  in  the  program  structure,  but  most  importantly, 
completely  understand  the  scenario  as  described  in  an  extensive  database.  The 
differences  between  scenarios  Involving  the  same  aircraft  type  may  only  Involve 
changing  several  cards,  but  building  the  components  of  the  baseline  database 
and/or  acquiring  sufficient  understanding  of  what  is  contained  in  such  a  data¬ 
base  are  significant  tasks.  Hence  the  need  for  a  disciplined  development  and 
adequate  documentation.  Civen  that  a  baseline  database  exists,  the  modeler 
must  replace,  merge,  or  modify  various  database  segments  to  fashion  a  new 
scenario  or  to  specify  excursions  from  the  base  rase.  Alternative  data  segments 
which  are  clearly  documented  are  therefore  often  needed.  The  availability  and 
limited  documentation  of  databases  for  both  TSAR  and  TSARINA  Impose  practical 
limitations  to  their  usefulness. 

The  author  of  TSAR  and  TSARINA,  Don  Emerson,  has  provided  analysts  with  extreme¬ 
ly  powerful  tools  for  tactical  support  analysis.  They  are  very  well  written 
and  documented.  The  real  problem  for  the  analyst  is  locating  sources  of  data 
to  make  use  of  the  full  richness  Inherent  In  the  models.  It  was  clear  to  those 
of  us  at  the  Air  Force  Center  for  Studies  and  Analyses  (AFCSA)  that  if  our 
results  and  observations  were  going  to  be  credible,  the  databases  and  assump¬ 
tions  they  embodied  would  need  to  be  documented.  <>ur  intent  was  to  collect 
selected  databases  within  AFCSA  to  support  current  and  projected  studies. 
Quality  documentation  of  these  databases  was  necessary  to  permit  analysts  to 
understand  the  assumptions,  limitations,  and  level  ot  detail  that  was  being  por¬ 
trayed.  The  resultant  availability  of  databases  and  standardization  of  docu¬ 
mentation  will  not  only  directly  support  In-house  investigations  but  will  also 
facilitate  studies  across  the  analysis  community.  because  ot  the  scope  ot  such 
a  task,  a  contract  was  let  to  ensure  its  timely  accomplishment. 

Orlando  Technology,  Inc.,  was  awarded  a  competitive  contract  for  TSAK/TSAK1NA 
support  tasks.  The  tasks  focus  around  the  model  databases  and  database  seg¬ 
ments.  They  began  with  the  existing  model  databases  and  updated  them  based  on 
the  most  current  government  data  available.  These  databases  were  to  be  docu¬ 
mented  in  three  ways.  The  first  is  a  dictionary  tor  ea< h  database  and  separate 
database  segment,  which  translates  the  database  codes  t<>  theft  Knglish  equiva¬ 
lents.  Secondly,  graphic  network  models  are  needed  tor  those-  portions  ot  the 
database  which  model  decision  logic  networks  t  >t  ic|  i;t  lasts.  And  tinallv. 


an  index  is  needed  to  cross-reference  the  database  segments,  dictionary,  and 
the  network  models  to  facilitate  their  use  by  modelers  and  analysts.  The 
long  term  intent  is  to  build  on  these  basic  databases  by  the  use  of  a  data¬ 
base  management  system  to  facilitate  changes,  updates,  and  analysis  scenario 
development.  As  the  models  mature  and  the  user  comswnity  grows,  the  model 
databases  will  continue  to  evolve  and  grow  in  depth  and  breadth.  This  document 
should  be  vlmed  as  an  advanced  prototype  which  will  hopefully  continue  to 
mature  and  increase  in  usefulness. 

TSAR  outputs  can  be  formidable  and  comparisons  between  TSAR  runs  may  involve 
collating  large  printouts;  this  document  was  developed  to  facilitate  the  use  of 
TSAR  output.  The  output  processor  produces  specific  TSAR  results  in  a  format 
compatible  with  standardized  analytic  software  packages  and  is  a  user  controlled 
option.  Users  assign  a  0  or  1  to  variables  identified  on  a  new  TSAR  card,  2-7, 
to  toggle  outputs  on  or  off.  The  resulting  TSAR  output  can  then  be  input  into 
the  analytic  packages  to  produce  the  desired  product  either  on  tabular  or  graphic 
form. 

Our  hope  is  that  you  will  wear  out  this  document  through  constant  usage.  Pass 
along  your  comments  and  criticisms  so  that  future  improvements  can  incorporate 
the  user  community's  collective  insights. 
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I.  TSAR  OUTPUT  PROCESSOR 


The  main  purpose  of  the  output  processor  is  to  better  facilitate  the 
analysis  of  TSAR  results.  The  output  processor  produces  specific  TSAR 
results  in  a  foraat  compatible  with  standard  analytic  sorftware  packages 
and  is  a  user  controllable  option.  The  multiple  TSAR  results  available 
Include  dally  summaries  of  sorties  flown  and  demanded,  aircraft  damaged 
lost,  canniballtatlons,  NMCS  hours  and  aircraft,  on-  and  off-equipment 
delays  due  to  limitations  of  personnel  and  AGE,  delays  due  to  spare  parts, 
and  quantities  and  times  of  on-equipment  tasks  and  off-equipment  repairs. 

In  this  documentation,  we  used  the  SAS*  System  as  our  analysis  output 
software.  Other  packages  may  be  used;  however,  the  TSAR  output  may  need 
to  be  modified  to  make  it  compatible  with  package  requirements.  Our  use 
of  SAS  in  no  way  implies  that  we  endorse  the  product. 

A.  Input /Out 

The  following  table  lists  the  FORTRAN  variable  name  and  the  logical 
unit  number  associated  with  each  output  processor  data  type.  The 
logical  unit  number  81  translates  into  output  file  name  ''F0R081" 
or  "F0R081.DAT". 


Data  Type 

Variable 

Name 

Logical 
Unit  Number 

Dally  Sorties  Flown 
and  Demanded 

SAS1 

81 

Aircraft  Lost 

SAS  2 

82 

Aircraft  Damaged 

SAS  3 

83 

Cannibal i rations 

SAS  4 

84 

NMCS  Hours 

SAS3 

85 

NMCS  Aircraft 

SAS  6 

86 

On-Equipment  delays 
due  to  limited  personnel 

SAS  7 

87 

Off-Equipment  delays 
due  to  limited  personnel 

SAS  8 

88 

On-Equipment  delays  due 
to  limited  AGE 

SAS  9 

89 

Off-Equipment  delays  due 
to  limited  AGE 

SAS  10 

90 

SAS  is  a  registered  trademark  of  SAS  Institute  Inc.,  Carey,  NC  USA. 


Delays  due  to  spare  parts 

SAS11 

91 

Quantities/Tlaes  of 

SAS  12 

92 

On-Equlpaent  Tasks 

Quantities/Tlaes  of 

SAS  13 

93 

Off-Equipment  Repairs 

Since  the  output  processor  is  to  be  controlled  by  the  user,  a  new 
TSAR  input  card  type  has  been  created.  On  this  input  card,  for  each  variable 
set  equal  to  1,  the  corresponding  output  processor  data  type  will  be  written 
to  the  corresponding  logical  unit  or  output  file  in  a  format  compatible 
with  SAS.  This  card  type  is  the  2/7  card  and  follows  the  standard  TSAR 
input  format  as  described  below: 


Columns 

Variable 

Value 

Explanation 

1-2 

I 

2 

TSAR  Card  type 

3-5 

J 

7 

TSAR  Card  subtype 

6-10 

SAS1 

0  or  1 

SAS1  Flag 

11-15 

SAS  2 

0  or  1 

SAS 2  Flag 

16-20 

SAS  3 

0  or  1 

SAS 3  Flag 

21-25 

SAS  4 

0  or  1 

SAS 4  Flag 

26-30 

SAS  5 

0  or  1 

SAS 5  Flag 

31-35 

SAS  6 

0  or  1 

SAS 6  Flag 

36-40 

SAS  7 

0  or  1 

SAS 7  Flag 

41-45 

SAS  8 

0  or  1 

SAS 8  Flag 

46-50 

SAS9 

0  or  1 

SAS9  Flag 

50-55 

SAS  10 

0  or  1 

SAS 10  Flag 

56-60 

sash 

0  or  1 

SASH  Flag 

61-65 

SAS  12 

0  or  1 

SAS 12  Flag 

66-70 

SAS  13 

0  or  1 

SAS 13  Flag 

n 
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B.  TSAR  Modifications 

The  following  paragraphs  describe  the  required  modifications  for 
each  data  type  and  the  TSAR  subroutines,  variables  and  data  arrays 
affected.  Appendix  A  contains  the  TSAR  Implementation  code. 

1 .  Common  Block 

FORTRAN  labeled  common  block,  "SAS" ,  contains  all  of  the  output 
processor  variables  and  is  included  in  those  subroutines  that 
contain  the  output  processor  code.  These  arrays  are  dimensioned 
for  the  maximum  values  in  TSAR.  The  amount  of  memory  required 
for  these  arrays  may  be  reduced  by  redimensioning  the  arrays  to 
the  maximum  number  of  TSAR  assets  the  user  expects  to  encounter. 
That  is,  if  the  database  being  processed  had  only  1000  parts,  2 
aircraft  and  2  bases,  SASCAN  and  SASPART  could  be  redimensioned 
from  (3199,  9,  63)  to  (1000,2,2). 

2.  Daily  Sorties  Flown  and  Demanded 

The  number  of  sorties  flown  and  demanded  each  day  is  printed  by 
subroutine  OUTPUT.  This  subroutine  is  called  at  the  end  of  each 
day  during  the  simulation.  The  cumulative  number  of  sorties 
flown  and  demanded  by  mission  priority,  mission  type,  aircraft 
type  and  base  number  is  stored  in  data  array  0UTPT1(2,  PRTY, 
MAXM,  MAXT,  MAXB)  and  0UTPT1(1 ,  PRTY,  MAXM,  MAXT ,  MAXB)  respec¬ 
tively. 

Subroutine  OUTPUT  tests  SAS1.  If  SAS1  is  equal  to  1 ,  a  record 
will  be  written  to  logical  unit  81.  This  record  contains  the 
trial  number,  day,  base,  aircraft  type,  mission  type,  mission 
priority,  number  of  sorties  flown  and  number  of  sorties  demanded. 

3.  Aircraft  Lost 

The  cumulative  number  of  aircraft  lost  is  stored  in  the  variable 
LOSTAC  which  is  the  number  of  all  tircraft  types  lost.  To 
distinguish  the  number  of  aircraft  lost  by  type,  a  new  data  array 
(SASLST)  was  created.  SASLST  is  dimensioned  according  to  the 
maximum  number  of  aircraft  types  (MAXT)  and  number  of  bases 
(MAXB)  simulated  in  TSAR.  Subroutine  KILLAC  updates  this  array 
each  time  an  aircraft  is  lost.  Subroutine  OUTPUT  tests  SAS2.  If 
SAS2  is  equal  to  1 ,  a  record  is  written  to  logical  unit  82.  This 
record  contains  the  trial  number,  day,  base,  aircraft  type  and 
quantity  of  aircraft  lost. 

4.  Aircraft  Damaged 

The  cumulative  number  of  aircraft  damaged  is  stored  in  the 
variable  DAMAC  which  is  the  number  of  all  aircraft  types  damaged. 
To  distinguish  the  number  of  aircraft  damaged  by  type,  a  new  data 
array  (SASDAM)  was  created.  SASDAM  is  dimensioned  according  to 
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the  maxi  urn  number  of  aircraft  types  (MAXT)  and  number  of  bases 
(MAXB)  simulated  In  TSAR.  Subroutine  PSTFLT  updates  this  array 
each  time  an  aircraft  Is  damaged.  Subroutine  OUTPUT  tests  SAS3. 
If  SAS3  Is  equal  to  1,  a  record  is  written  to  logical  unit  83. 
This  record  contains  the  trial  number,  day,  base,  aircraft  type 
and  quantity  of  aircraft  damaged. 

Cannibal lzat Ions 

The  cumulative  number  of  cannibal lzat Ions  by  base  Is  stored  In 
BAS ES( 6 , BAS E )  and  Is  updated  in  subroutine  CANNIB.  To 
distinguish  the  number  of  cannl bal 1 za t ions  by  part  number, 
aircraft  type  and  base,  a  new  data  array  (SASCAN)  was  created. 
SASCAN  is  dimensioned  according  to  the  maximum  number  of  parts 
(NPART),  the  number  of  aircraft  types  (MAXT)  and  number  of  bases 
(MAXB).  Subroutine  CANNIB  updates  this  array  each  time  a  part  is 
cannibalized.  Subroutine  OUTPUT  tests  SAS4.  If  SAS4  is  equal  to 
1,  a  record  Is  written  to  logical  unit  84.  This  record  contains 
the  trial  number,  day,  base,  part  number  and  number  of 
cannl bal lzat ions. 

NMCS  Hours 

The  cumulative  number  of  NMCS  hours  is  stored  In  data  array 
NORHRS( BASE)  and  Is  the  NMCS  hours  for  all  aircraft  types  for  a 
given  base.  To  distinguish  the  NMCS  hours  by  aircraft  type  and 
base,  a  new  data  array  ( SASNMH)  was  created.  SASNMH  is 
dimensioned  according  to  the  maximum  number  of  aircraft  types 
(MAXT)  and  the  maximum  number  of  a  bases  (MAXB)  simulated  In 
TSAR.  Subroutine  MANAGE  was  modified  to  update  this  array. 
Subroutine  OUTPUT  tests  SAS5.  If  SAS5  Is  equal  to  1  ,  a  record  Is 
written  to  logical  unit  85.  This  record  contains  the  trial 
number,  day,  base,  aircraft  type  and  the  NMCS  hours. 

NMCS  Aircraft 

The  cumulative  number  of  NMCS  aircraft  Is  stored  In  data  array 
NOR(BASE)  which  Is  the  number  of  NMCS  aircraft  for  all  aircraft 
types  for  a  given  base.  To  distinguish  the  NMCS  aircraft  by 
aircraft  type  and  base,  a  new  data  array  (SASNMA)  was  created. 
SASNMA  Is  dimensioned  according  to  the  maximum  number  of  aircraft 
types  (MAXT)  and  the  maximum  number  of  bases  (MAXB)  simulated  In 
TSAR.  Subroutine  MANACE  updates  thin  array.  Subroutine  OUTPUT 
tests  SAS6.  If  SAS6  is  equal  to  1,  a  record  Is  written  to 
logical  unit  86.  This  record  contains  the  trial  number,  day, 
base,  aircraft  type  and  the  number  of  NMCS  aircraft. 

On-  and  Off-Equipment  Delays  Due  to  Personnel 

Delays  due  to  limitation:;  'd  personnel  are  stored  In 
OUTPER(  2  .NOPEOP ,  M  AXIS  1  lot  on-eqiilpment  tasks  and  in 
OUTPEO(  2 .NOPEOP, MAX B )  tot  of  1 -equ  l  pment  repairs.  To  distinguish 
these  delays  by  personnel  type  and  base,  two  new  data  arrays 
(SASPER  and  SASPEO)  were  created.  SASPER  and  SASPEO  are 


dimensioned  according  to  the  maximum  type  of.  personnel  (NOPEOP) 
and  maximum  number  of  bases  (MAXB)  simulated  In  TSAR.  To 
distinguish  the  number  of  on-  and  of f-equlpment  delays  for  each 
personnel  type,  two  new  variables  (CNTPER  and  CNTPEO)  were 
created.  SASPER,  SASPEO,  CNTPER  and  CNTPEO  are  updated  in 
subroutine  TIMES.  Subroutine  OUTPUT  tests  SAS7  and  SAS8.  If 
SAS7  is  equal  to  1 ,  a  record  consisting  of  trial  number,  day, 
base,  personnel  type,  on-equipment  delay  time,  and  number  of 
delays  is  written  to  logical  unit  87.  If  SAS8  is  equal  to  1 ,  a 
record  consisting  of  trial  number,  day,  base,  personnel  type, 
Off-equipment  delay  time  and  the  number  of  delays  is  written  to 
logical  unit  88. 

9.  On-  and  Of f-Equipment  Delays  Due  to  AGE 

Delays  due  to  limitations  of  AGE  are  stored  in 
0UTAGE(2, NOAGE, MAXB)  for  on-equipment  tasks  and 
OUTEQP(2, NOAGE, MAXB)  for  off-equipment  repairs.  To  distinguish 
these  delays  by  AGE  type  and  base,  two  new  data  arrays  (SASAGE 
and  SASEQP)  were  created.  SASAGE  and  SASEQP  are  dimensioned 
according  to  the  maximum  type  of  AGE  (NOAGE)  and  maximum  number 
of  bases  (MAXB)  simulated  in  TSAR.  To  distinguish  the  number  of 
on-  and  of f-equlpment  delays  for  each  AGE  type,  two  new  variables 
(CNTAGE  and  CNTEQP)  were  created.  SASAGE,  SASEQP,  CNTAGE  and 
CNTEQP  are  updated  in  subroutine  TIMES.  Subroutine  OUTPUT  tests 
SAS9  and  SAS1 0.  If  SAS9  is  equal  to  1  ,  a  record  consisting  of 
trial  number,  day,  base,  AGE  type,  on-equipment  delay  time  and 
number  of  delays  is  written  to  logical  unit  89.  If  SAS10  Is 
equal  to  1 ,  a  record  consisting  of  trial  number,  day,  base,  AGE 
type,  off-equipment  delay  time  and  the  number  of  delays  is 
written  to  logical  unit  90. 

10.  Delays  Due  to  Spare  Parts 

Delays  due  to  limitation  of  spare  parts  is  stored  in 
OUTPRT(2, NOPART, MAXB).  To  distinguish  this  delay  by  spare  part 
type  and  base,  a  new  data  array  (SASPRT)  was  created.  SASPRT  is 
dimensioned  according  to  the  maximum  number  of  spare  parts 
(NOPART)  and  the  maximum  number  of  bases  (MAXB)  simulated  in 
TSAR.  To  distinguish  the  number  of  delays  for  each  spare  part,  a 
new  variable  (CNTPRT)  was  created.  SASPRT  and  CNTPRT  are  updated 
in  subroutine  TIMES.  Subroutine  OUTPUT  tests  SAS11.  If  SAS1 1  is 
equal  to  1 ,  a  record  consisting  of  trial  number,  day,  base,  spare 
part  type,  delay  time  and  number  of  delays  is  written  to  logical 
unit  91 . 


11.  Quantities/Times  of  On-Equipment  Tasks 


Quantities  and  times  of  on-equ I pment 
0UTSHP(2, SHOP, MAXB).  To  d  i  rt  1  »gti  1  sh  the 


tasks  are  stored  in 
task  times  !>y  shop  and 


base,  a  new  data  array  fSASONl  wa:.  created.  SASON  Is  dimensioned 


according  to  the  maximum  number  of  shops  (SHOP)  and  the  maximum 
number  of  bases  (MAXB)  simulated  In  TSAR.  To  distinguish  the 
number  of  times  a  shop  performs  an  on-equipment  task,  a  new 

* 


variable  (CNTON)  was  created.  SASON  and  CNTON  are  updated  In 
subroutine  TIMES.  Subroutine  OUTPUT  tests  SAS12.  If  SAS12  Is 
equal  to  1 ,  a  record  consisting  of  trial  number,  day,  base,  shop, 
task  time,  and  number  of  tasks  Is  written  to  logical  unit  92. 


12.  Quantltles/Tlmes  of  Off-Equipment  Repairs 

Quantities  and  times  of  of f-equipment  repairs  are  stored  in 
0UTSHP(5,SH0P,MAXB).  To  distinguish  the, repair  times  by  shop  and 
base,  a  new  data  array  (SASOFF)  was  created.  SASOFF  Is 
dimensioned  according  to  the  maximum  number  of  shops  (SHOP)  and 
the  maximum  number  of  bases  (MAXB)  simulated  in  TSAR.  To 
distinguish  the  number  of  times  a  shop  performs  an  off-  equipment 
task,  a  new  variable  (CNTOFF)  was  created.  SASOFF  and  CNTOFF  are 
updated  In  subroutine  TIMES.  Subroutine  OUTPUT  tests  SAS13.  If 
SAS13  Is  equal  to  1 ,  a  record  consisting  of  trial  number,  day, 
base,  shop,  repair  time,  and  number  of  repairs  Is  written  to 
logical  unit  93. 

13.  TSAR  Output  Summaries 

At  the  end  of  each  day,  subroutine  OUTPUT  writes  a  record 
consisting  of  the  total  number  of  aircraft  damaqed,  aircraft 
lost,  NMCS  aircraft  hours  and  number  of  NMCS  aircraft  to  logical 
unit  6.  To  accumulate  the  number  of  aircraft  damaged,  aircraft 
lost,  NMCS  aircraft  hours  and  number  of  NMCS  aircraft  for  each 
trial,  four  new  data  arrays  (SASDAMT,  SASLSTT,  SASNMHT,  and 
SASNMAT)  were  created.  At  the  end  of  each  day,  subroutine  OUTPUT 
updates  SASDAMT, SASLSTT, SASNMHT,  and  SASNMAT.  At  the  end  of  each 
trial,  subroutine  SUMUP  writes  a  record  consisting  of 
SASDAMT, SASLSTT, SASNMHT,  and  SASNMAT  to  logical  unit  6. 


C.  Summary  of  Subroutine  Updates 

manage 

Accumulates  the  number  of  NMCS  aircraft  hours  for  each  base  by 
aircraft  type  (SASNMH). 

INIT 

Initializes  the  value  of  SASLST,  SASLSTT,  SASDAM,  SASDAMT,  SASNMA, 
SASNMAT,  SASNMH,  SASNMHT,  SASPER,  SASPEO,  CNTPF.R,  CNTPEO,  SASAGE, 
CNTAGE,  CNTEQP,  SASEQP,  CNTPRT,  SASPRT,  SASCAN,  SASON,  SASOFF,  CNTON 
and  CNTOFF  to  zero  after  each  trial. 

INPUT 

Reads  the  2/7  card  and  clink:-  the  value  oi  SAS1,  S  A  S  2 ,  S  AS  3 .  SAS4, 
SAS5  ,  SAS6  ,  SAS  7  ,  S  AS  8  ,  SAS*».  SASIO,  SAS  I  1  S  AS  1  2  and  S  AS  I  3.  Writes 
the  header  to  the  appropriate  logical  unit. 


b 


OUTPUT 

Writes  the  data  to  the  appropriate  logical  unit  after  each  day  and 
accumulates  the  total  of  number  of  aircraft  damaged,  aircraft  lost, 
NMCS  aircraft  hours  and  number  of  NMCS  aircraft  for  each  trial. 
Converts  TTU's  to  hours  for  variables  SASPER,  SASPEO,  SASAGE,  SASEQP, 
SASPRT,  SASON,  and  SASOFF. 

Writes  a  dally  summary  of  the  number  of  aircraft  damaged,  aircraft 
lost,  NMCS  aircraft  hours  and  number  of  NMCS  aircraft  to  logical  unit 
6.  Initializes  variables  SASLST,  SASDAM,  SASNMH,  and  SASNMA  to  zero 
after  dally  summary  Is  written. 

Accumulates  the  total  number  of  aircraft  damaged  (SASDAMT),  aircraft 
lost  (SASLSTT),  NMCS  aircraft  hours  (SASNMHT),  and  number  of  NMCS 
aircraft  (SASNMAT)  for  each  trial. 

SUMUP 

Writes  a  summary  of  the  number  of  aircraft  damaged,  the  number  of 
aircraft  lost,  NMCS  aircraft  hours  and  number  NMCS  aircraft  to 
logical  unit  6  at  the  end  of  each  trial.  Initializes  variables 
SASLSTT,  SASDAMT,  SASNMHT,  and  SASNMAT  to  zero  after  the  trial 
summary  Is  written. 


Accumulates  on-equlpment  task  time  (SASON),  number  of  on-equlpment 
tasks  (CNTON),  of f -equ 1 pment  task  time  (SASOFF),  number  of  off- 
equlpment  tasks  (CNTOFF),  on-equlpment  personnel  delay  time  (SASPER), 
number  of  on-equipment  personnel  delays  (CNTPER) ,  on-equlpment  AGE 
delay  time  (SASAGE),  number  of  on-equlpment  AGE  delays  (CNTAGE), 
delay  time  for  parts  (SASPRT),  number  of  delays  for  parts  (CNTPRT), 
of f-equipment  personnel  delay  time  (SASPEO),  number  of  off-equlpment 
delays  for  personnel  (CNTPEO),  off-equlpment  AGE  delay  time  (SASEQP), 
and  number  of  off-equlpment  AGE  delays  (CNTEQP). 

PSTFLT 

Accumulates  the  number  of  aircraft  damaged  (SASDAM). 


CAN, NIB 


Accumulates  the  number  of  cannl bal I zat  ions  (SASCAN). 


KILL AC 

Accumulates  the  number  of  aircraft  lost  (SASt.ST). 

NORRPT 

Accumulates  the  number  o(  NMCS  aircraft  (SASNMA). 


7 


Variables  Added  to  TSAR 


Variably 

sasi 

SAS2 

SAS3 

SAS4 

SAS5 

SAS6 

SAS7 

SAS8 

SAS9 

SAS10 

SASI  1 

SASI  2 

SASI  3 


Purpose 

Write  "dally  sorties  flown  and  denanded" 
to  logical  unit  81.  (CT  2/7) 

Write  'aircraft  lost"  to  logical  unit 

82.  In  addition,  write  summary  of 
"aircraft  lost"  for  each  day  and  trial  to 
logical  unit  6.  (CT  2/7) 

Write  "aircraft  damaged"  to  logical  unit 

83.  In  addition,  write  summary  of 
"aircraft  damaged"  for  each  day  and  trial 
to  logical  unit  6.  (CT  2/7) 

Write  "cann  I  bal  1  zat  1  ons"  to  logical  unit 

84.  (CT  2/7) 

Write  "NMCS  hours"  to  logical  unit  85. 
In  addition,  write  summary  of  “NMCS  hours' 
for  each  day  and  trial  to  logical  unit  6. 
(CT  2/7) 

Write  "NMCS  aircraft"  to  logical  unit  86. 
In  addition,  write  summary  of  "NMCS 
aircraft"  for  each  day  and  trial  to 
logical  unit  6.  (CT  2/7) 

Write  "on -equipment  delays  due  tc 
personnel"  to  logical  unit  87.  (CT  2/7) 

Write  "off-equlpment  delays  due  to 
personnel"  to  logical  unit  88.  (CT  2/7) 

Write  "on-equlpment  delays  due  to  AGE"  to 
logical  unit  89.  (CT  2/7) 


Write  "off-equlpment  delays  due  to  AGE"  to 
logical  unit  90.  (CT  2/7) 

Write  "delays  due  to  spare  parts'  to 
logical  unit  91.  (CT  2/7) 

Write  "on-equlpment  task  time"  to  logical 
unit  92.  (CT  2/7) 

Write  "off-equlpment  repair  time"  to 
logical  unit  93.  (CT  2/7) 


i 


a 


SASLST( ACTYPE , BASE ) 


Number  of  aircraft  lost  for  each  aircraft 
type  by  base,  (subroutine  KILLAC) 


SAS DAM ( ACTYPE , BASE ) 

SASPER( NOPEOP , BASE ) 

SASPEO( NOPEOP , BASE ) 

SASAG  E( NO AGE . BASE) 

SAS  F.QP(  NOAG E  .  BASE) 

SASCANf  NOPART .ACTYPE 

SASNMH( ACTYPE .BASE) 

SASPRTCNiiPARI  ,  BASE) 

SASDAMTC ACTYPE. BASE) 

SAS  1ST l'(  ACTYPE . BASE ) 

SASNMHTt  ACTYPE .BASE) 

SASNMATi ACTYPE. BASF) 

S ASON ( BASF , SHOP) 

SASOFF( BASE, SHOP) 

CNTPF.R(  NOPEOP  .  SHOP) 


Number  of  aircraft  damaged  for  each 
aircraft  type  by  base,  (subroutine  PSTFLT) 

On-equipment  personnel  delay  time  (TTUS) 
for  each  personnel  type  by  base. 
(Subroutine  TIMES) 

Of  f -equ l pment  personnel  delay  time  (TTUS1 
for  each  personnel  type  by  base. 

(Subroutine  TIMES) 

On-equlpment  AGE  delay  time  (TTUS)  for 
each  ACE  type  by  base.  (Subroutine  TIMES) 

Off-equlpment  AGE  delay  time  (TTUS)  for 
each  AGE  type  by  base.  (Subroutine  TIMES) 

BASE)  Number  of  cann 1 ba 1 1 za t 1  on s  by  part  number 
for  each  type  aircraft  by  base. 
(Subroutine  CANN IB) 

Number  of  NMCS  altrraft  hours  for  each 
base  by  airciaft  type.  (Subroutine  NORRPT) 

Delay  time  (TTUS)  for  each  part  type  by 
base.  (Subroutine  TIMES) 

Summary  of  number  of  aircraft  damaged  by 
aircraft  type  for  ear h  base  by  trial. 

(Subroutine  OUTPUT) 

Summary  of  number  of  aircraft  lost  by 
aircraft  type  lor  each  base  by  trial. 

(Subroutine  OUTPUT) 

Summary  of  number  of  NMCS  aircraft  hout s 
by  aircraft  type  for  each  base  by  trial. 
(Subroutine  OUTPUT) 

Summary  of  number  of  NMCS  aircraft  by 
a  1  t  i  t  a  I  t  type  for  e a  i  h  base  by  t  i  1  a  1 

(  r,u  b  r  out  I  ne  Oil!  TUT  t 

On-equlpment  task  time  (TTUS'  toi  each 
shop  by  base.  (Subroutine  I  IMPS) 

off  .  ■  i  j  u i p  m  i  n 1  i  t  s  k  time  (1  I  1 1  S  1  tot  each 

.  j  tv  ba  si  .  ■  i :  !  i  '  u  '  1  "c  1  I  M  I  S  ' 

Number  of  on-equlpment  delays  for  each 
personnel  type  by  shop.  (Suhr  nit  Ine  TIMES) 


Sir PCO( NOPCOP, SHOP)  Number  of  off-equlpment  delays  for  each 

personnel  type  by  shop.  (Subroutine  TIMES) 

CNTAGE  ( NOAGE  ,  EASE )  Nuaber  of  oe-equl pment  delays  for  each  AGE 

type.  (Subroutine  TUBS) 

CUTE QP( NOAGE, BASE)  Nun be r  of  of f-equi pment  delays  for  each 

AGE  type  by  beae.  (Subroutine  TIMS) 

CNTPKT(NOPAKT,BASE)  Nusber  of  delays  for  each  part  type  by 

beae.  (Subroutine  TIMS) 

drOM( BASE  .SHOP)  Nusber  of  on-equipaMnt  tasks  for  each  shop 

by  base.  (Subroutine  TIIBS) 

CKTOPP( BASE .SHOP)  Nueber  of  of f-equipaunt  tasks  for  each 

shop  by  base.  (Subroutine  TIMES) 


E.  ANALYSIS  OF  TSAK  DATA 

To  ensure  the  accuracy  of  the  output  data  as  well  as  the  compatibility  of 
this  data  with  the  SAS  software,  SAS  procedures  were  developed  to  test  each 
of  the  output  files.  These  procedures  are  representative  of  the  kinds  of 
analysis  that  aay  be  done  using  SAS.  They  are  not  Intended  to  be  all 
inclusive  but  show  that  the  output  filea  are  compatible  with  SAS.  The 
out put a  from  the  F-4G  database  (SAS  inputs)  are  Included  aa  Appendix  B.  It 
should  be  noted  that  thla  TSAK  run  did  not  encounter  any  off-equlpment 
delays  for  AGE.  The  data  for  on-equlpawnt  delays  for  A(Z  were  used  as  the 
Input  for  SAS. 

1.  INPUTS  TO  SAS 

The  output  data  from  TSAR  (Input  data  to  SAS)  resides  on  disk  end  is 
read  Into  SAS  using  the  'filename'  and  'Inf lie*  statements.  The  actual  SAS 
procedure  flies  need  not  contain  the  data  but  only  need  to  access  it  non 
the  disk.  This  method  makes  changing  data  a  matter  of  changing  the  darn 
file  name  Instead  of  deleting  the  old  data  and  adding  the  new  data  Into  t^e 
SAS  procedure  file. 

2.  SAS  PROCEDURES 

There  are  assorted  SAS  procedures  (PROCs)  available  to  analyze  the 
d«ta  from  TSAR.  It  Is  unllkey  that  one  would  want  to  run  all  of  these  Procs 
at  one  time.  The  unneeded  statements  can  be  'commented'  out  by  placing  an 
'*'  In  column  one  and  entering  a  semi-colon  following  the  comment  or  block  of 
comments.  The  entire  Job  can  now  be  run  with  only  the  desired  Procs  being 
executed. 

DESCRIPTIVE  —  A  complete  set  of  SAS  statements  Is  available  for  modifying 
data.  This  permits  great  flexibility  In  formatting  output. 

ANALYTICAL  —  The  statistical  analysis  procedures  In  SAS  range  from  simple 
statistics  to  complex  multlvarlte  techniques. 
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GRAPHIC  --  SAS  graphic  procedures  can  be  used  to  deslqn  displays  showing 
Inf  or set  ion  In  aeanlnqful  pictures.  Extensive  title  and  footnote  capabilities 
allow  the  user  to  explain  the  nature  of  the  data  or  to  annotate  the  display 

a.  DISC  It  1  PT I V  E  PAOCS 

(1)  PROC  PAINT  -  prints  a  listlnq  of  the  values  of  some  or  all  of 
the  variables  in  a  SAS  data  set  Customized  reports  usinq  options  and 
statements  are  available.  For  example,  with  a  BY  statement  PAOC  PA1N1 
separates  observations  Into  qroups  defined  by  the  BY  variables  Numeric 
variable  totals  can  be  printed  If  a  SUM  statement  is  used 

(2)  PAOC  TABULATE  -  displays  descriptive  statistics  In  hlerachltal 
tables.  Bach  table  cell  belonqs  to  a  particular  cateqory  of  observations 
composed  of  crosslnq  variable  names  The  statistic  associated  with  each  cell 
Is  calculated  on  values  from  all  observations  In  that  cateqory. 

PAOC  TABULATE  provides 

•  simple  but  powerful  methods  to  create  user-dellned  tables. 

•  a  qreat  deqree  of  flexibility  In  c  lassl f lest  I  on  of  hterachles 

•  a  variety  of  mechanisms  tor  titling  and  formatting  variables  and 
procedure-qenerated  statistics 

b.  STATISTICAL  PAOC: 

(1)  PAOC  MEANS  -  can  compute  statistics  for  an  entire  SAS  data  set 
or  for  qroups  of  observations  In  the  data  set.  If  the  BY  statement  Is  used, 
MEANS  calculates  descriptive  statistics  separately  tor  qroups  of  observations. 
Each  qroup  is  composed  of  observations  having  the  same  values  of  the  variables 
used  in  the  BY  statement 

(2)  PROC  SUMMARY  -similar  to  PROC  I .  E  AMS  except  that  MEANS  produce-, 
subgroup  statistics  only  when  a  BY  statement  Is  used  SUMMARY  does  not 
produce  any  printed  output  The  SUMMARY  output  data  Is  typically  printed  with 
PROC  PRINT  or  Is  Input  to  a  DATA  step  that  extracts  the  desired  Information 

(3)  PAOC  ANOVA  -  used  to  perform  analysis  of  variance  on  ba 1  a  m-  ed 
data.  MEANS  can  be  .imputed  for  anv  effect  involving  class  variables 
Several  options  are  available  lor  use  with  the  MFANS  procedure 

■ON  --  performs  Bonferronl  t  tests  of  dlfferentes  between  means  for 
all  main-effect  means  in  ’he  MFANS  statement 

DUNCAN  performs  Duncan  .  multiple  r  a  r:  je  •  e  .  t  r  all  main  effect 
means  given  In  the  MEAN:,  'ccm-ut 

SCH  F 1 F  f  per  I  or  m 
ma  I  n  - e f  I  e<  t  mean  - 


•  he  "  ’  -'I 


SMC  —  ptrfortf  the  StudntHlamMHteuli  multiple  rang*  cast  on  all 
main-effect  aaana  la  cha  WARS  atataaant. 


TUKBY  —  parforaa  Tukey's  student lsed  range  eaac  (USD)  on  all  nain- 
affact  aaaaa  In  cha  WARS  statement. 

(4)  PROCSTIPVISt  -  la  moat  helpful  for  exploratory  analyais 
bacauaa  It  can  give  Cha  usar  lnalghc  lnco  cha  raladoaahlp  between  cha 
Independent  variables  and  cha  dependent  var labia.  Ic  provldaa  five  net hods 
for  stepwise  rag rasa Ion.  STtPVISE  ia  usaful  whan  cha  baac  aaC  of  lndapandant 
varlablas  naad  to  ba  found  for  inclusion  in  Cha  ragrasslon  nodal. 

c.  GRAPHIC  PROCS: 

(1)  PROC  PLOT  —  graphs  ona  variabla  against  anothar,  producing  a 
printer  plot.  The  coordinates  of  each  point  on  Cha  ploc  correspond  to  cha 
value  of  two  varlablas  In  ona  or  aore  observations  of  the  Input  data  set. 

(2)  PROC  CHART  —  produces  vertical  and  horltontal  bar  charts. 
These  charts  are  usaful  for  showing  plccorlally  a  variable's  value  or  the 
relationship  between  cwo  or  aore  varlablas. 

NOTE - Both  of  cha  above  graphic  procedures  are  available  on 

S AS /GRAPH . *  SAS/CRAPH  is  an  enhanced  graphics  package  chac  allows 
the  user  to  Introduce  color  and  three  dimensions  Into  cha  oucpuc. 
Also,  extensive  title  and  footnote  capabilities  allow  the  usar  to 
explain  the  nature  of  the  data  and  enhance  the  display. 

3.  SAS  Manipulations 

The  following  aanl pulat lone  were  performed  on  the  output  froa  the 
F-4C  data  base.  The  SAS  Procs  and  a  selected  sample  of  results  are  con¬ 
tained  In  Appendix  C. 


TAPE  81  —  SORTIE  FLOWN /DC MAN DSD 

1.  Average  sorties  flown  by  trial. 

2.  Average  sorties  flown  by  day. 

3.  Average  sorties  flown  by  aircraft. 

4.  Significant  differences  of  sorties  flown  by  trial. 
*>.  Significant  differences  of  sorties  flown  by  day. 


•SASGRAPH  Is  a  registered  trademark  of  SAS  Institute  Inc.,  Carey,  NC  USA. 


••  .»• 


TAPE  82 


AIRCRAFT  LOST 


1.  Averaqe  aircraft  lost  by  trial. 

2.  Average  aircraft  lost  by  day. 

3.  Significant  differences  of  aircraft  lost  by  trial. 

4.  Significant  differences  of  aircraft  lost  by  day. 

TAPS  83  --  AIRCRAFT  DAMAGED 

1.  Average  aircraft  damaqed  by  trial. 

2.  Average  aircraft  damaqed  by  day. 

3.  Significant  differences  of  aircraft  damaqed  by  trial. 

4.  Significant  differences  of  aircraft  damaqed  by  day. 

TAPE  84  --  CANNIBAL I 2 AT IONS 

1.  Total  number  of  parts  canned  by  a  l  rcraf t  / 1 r 1 al . 

2.  Total  number  of  parts  canned  by  a  1 rcraf t /day . 

3.  Total  number  of  cannl bal 1 zat Ions  by  a  1 rcraf t /part . 
TAPE  85  --  NMCS  HOURS 

1.  Average  number  of  NMCS  hours  by  trial. 

2.  Average  number  of  NMCS  hours  by  day. 

3.  Significant  number  of  NMCS  hours  by  trial. 

4.  Significant  number  of  NMCS  hours  by  day. 

TAPE  86  --  NMCS  AIRCRAFT 

I  Averaqe  number  of  NMCS  aircraft  by  trial. 

2.  Averaqe  number  of  NMCS  aircraft  by  day. 

3.  Significant  number  of  NMCS  aircraft  by  trial 

4.  Significant  number  of  NMCS  aircraft  by  day 


TAPI  87  --  ON -EQUIP  DELAY /PIRSONN EL  TYPE 


1.  Averaqe  number  of  delays  by  tr lal/parsonnel  type. 

2.  Averaqe  number  of  delays  by  day /personnel  type. 

3.  Significant  number  of  delays  by  trial /personnel  type. 

4.  Significant  number  of  delays  by  day/personnel  type. 

TAPE  88  —  Orr-EQUIP  DELAY / PERSONNEL  TYPE 

1.  Average  number  of  delays  by  trial /personnel  type. 

2.  Significant  number  of  delays  by  trial/personnel  type. 

TAPE  89  —  ON-EQUIP  DELAY/AGE  TYPE 

1.  Average  number  of  delays  by  trlal/ACE  type. 

2.  Significant  number  of  delays  by  trlal/ACE  type. 

TAPE  90  --  OFF-EQUIP  DELAY/ACE  TYPE 

1 .  Average  number  of  delays  by  trlal/ACE  type. 

2.  Significant  number  of  delays  by  trlal/ACE  type. 

TAPE  91  --  DELAY  TINE/PART  TYPE 

1.  Average  delay  time  by  trial/part  type. 

2.  Average  delay  time  by  day/part  type. 

3  Significant  difference  In  mean  delay  time  by  trial/part  type 

4  Significant  differences  in  mean  delay  1 1  me  by  day/part  type. 
TAPE  92  --  ON  EQUIP  DELAY  TINE/SHOP  NUMBER 

'  Average  delay  time  by  trial7 shop  number 

2  Averaqe  delay  time  by  day/shop  number 

'  '*  I  *|M  If  I  *  4Ml  .tl  I  l»i  urn  *  lii  me  ill'  U  y  II  mi'  I  •  y  i  i  l  .i  I  /  .li  |  mimin'  l 

4  SlqnlH'drit  differ  e  n<e  In  mean  delay  t  I  me  by  da  y  /  ',h<  mimlii*  i 

TAPF  91  __  OFF-EQUIP  DELAY  TIHF'SMOP  NUHBFR 

1  Average  delay  M  me  i>.  >  .  •  •  '  h  |  mimbct 


Significant  difference  In  mean  delay  time  by  trial  shop  number 


4. 


(SAMPLES  OF  GRAPHIC  PROCEDURES 


The  following  qraphlc  procedures  were  performed  on  the  output  from  the 
P-4C  date  bate.  The  SAS  Procs  and  a  selected  sample  of  results  are  contained 

In  Appandlx  D. 


TAPE  81  --  SORTIES  F LOWN / D EMAN D E D 


1.  Sorties  flown  by  day/sortles  demanded  by  day. 

2.  Sorties  flown  by  day/trlal. 

TAPE  82  --  AIRCRAFT  LOST 

I-  Aircraft  lost  by  day/trlal. 

2.  Aircraft  lost  by  day. 

TAPE  83  --  AIRCRAFT  DAMACED 

1.  Aircraft  damaqed  by  day/trlal. 

2  Aircraft  damaqed  by  trial. 

TAPE  84  --  CANNIBAL  I ZAT IONS 

1  Number  of  cannibal Izat tons  by  day. 

2.  Number  of  cannl ba 1 1 zat 1 ons  by  part /trial. 

TAPE  85  --  NNCS  HOURS 

1.  Number  of  NMCS  hours  by  day. 

2  Number  of  NMCS  hours  by  day/trlal 


TAPE  86  --  NMCS  AIRCRAFT 


1  Number  of  NMCS  aircraft  by  day. 

2.  Number  of  NMCS  alrcralt  by  day/trlal. 
TAPE  87  -  ON -EQUIP  DELAY / PERSONNEL  TYPF 
1.  Delay  (minutes)  by  day'trial. 

2-  Delay  (number)  by  perform*’!  <  .  p>  da\ 


TAPE  88  —  OFP- EQUIP  DELAY /PERSONNEL  TYPE 

1.  Delay  (alnutes)  by  day/trial. 

2.  Delay  (nueber)  by  personnel  type/day 
TAPE  89  —  ON-EQUIP  DELAY/AGE  TYPE 

1.  Delay  (Minutes)  by  day/trlal. 

2.  Delay  (nuMber)  by  AGE  type/day. 

TAPE  90  —  OFF-EQUIP  DELAY/AGE  TYPE 

1.  Delay  (minutes)  by  day/trlal. 

2.  Delay  (minutes)  by  AGE  type/day. 

TAPE  91  --  DELAY  TIME/PART  TYPE 

1.  Delay  (minutes)  by  day/trlal. 

2.  Delay  (number)  by  part /day. 

TAPE  92  --  ON-EQUIP  DELAY  TIME/SHOP 

1.  Delay  (minutes)  by  day/trlal. 

2.  Delay  (number)  by  shop/day. 

TAPE  93  —  OFF-EQUIP  DELAY  TIME/SHOP 

1.  Delay  (minutes)  by  day/trlal. 

2.  Delay  (number)  by  shop/day. 


Ji  5  f  h* .  I j '  €,*  ».*  «. ’•  i  t  t  V  i.t  .  1  ,  |  i  (  ,  •»,*», 
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APPENDIX  A 


TSAR  IMPLEMENTATION  CODE 


ooouo  o  oo 


TAB  A 

SUBROUTINE  MANAGE 
1 .  INSERT  COMMON 


OTI  SAS  OUTPUT  PROCESSOR  MOD  1  MARCH.  198? 

......... . .  COMMON  SAS  . . . 

INTEGER  *4  SAS 1 . SAS2 , SAS3 . SAS4 , SAS5 . $AS6 . SAS7 , SAS8 . SAS9 . SAS 10. 

•  SAS 1 1 . SAS 12 . SAS 13 . SASLST . SASDAM. SASPER , SASPEO . SASAGE . SASEQP . 

•  SASCAN, SASNMH, SASNMA . SASPRT , SASOAMT . SASLSTT , SASNMHT , SASNMAT . 

•  SASON . SASOFF . CNTPER . CNTPEO . CNTAGE . CNTEOP . CNTPRT , CNTON . CNTOFF 

COMMON  /SAS/  SAS1 .SAS2.SAS3.SAS4, SASS. SASS. SAS7. SASS. SAS9. SAS 10. 

•  SAS 1 1 . SAS 1 2 . SAS 1 3 . SASLST ( 9 , 63 ) . SASOAM( 9 . 63 ) . SASEQP (99,63). 

•  SASCAN( 3 199 , 9 . 63 ) . SASNMH( 9,63), SASNMA (9,63). SASPRT (3199,63), 

•  SASPER (320.63), SASPEO( 320 . 63 ) . SASAGE (99,63). SASOAMT( 9 . 63 ) . 

•  SASLSTT ( 9.63), SASNMHT ( 9 . 63 ) , SASNMAT ( 9,63), SASON( 9. 30) . 

•  SASOFF (9,30) . CNTPER( 320, 63 ) . CNTPEO( 320, 63 ) , CNTAGE(99 . 63 ) . 

•  CNT£QP( 99,63). CNTPRT (3199,63), CNTON( 9,30) . CNT0FF(9 . 30 ) 

. * . .  COMMON  SAS  . . . 


2.  INSERT  CODE  AFTER  LINES 


6116  REM  «  TD  -  3MT0/3) 

IF  (REM  GT  0)  GO  TO  6800 


COOE  TO  BE  INSERTEO 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  1987 

BOB  •  BASES ( 1 .BASE) 

ATP  «  ACN( BOB ,  1  )/5 1 2 
AIXO  «  ACN( BOB , 2  ) 

BAS  «  AIXD-100*(AIXO/100) 

SASNMH(ATP.BAS)  «  SASNMHf ATP . BAS  )  ♦  (3*N0R(BAS)) 
C  SAS  OUTPUT  PROCESSOR  MOO 


TAB  B 

SUBROUTINE  INI T 

1 .  INSERT  COMMON  : 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  19B7 

C 

. . . .  COMMON  SAS  *••«”*• 

C 


INTEGER  *4  SAS1 . SAS2. SAS3, SAS4.SAS5, SAS6. SAS7, SAS8, SAS9, SAS 10, 

*  SAS 1 1 . SAS 1 2 . SAS 1 3 . SASLST . SASDAM , SASPER . SASPEO . SASAGE . SASEQP . 

-  SASCAN . SASNMH. SASNMA . SASPRT . SASOAMT , SASLSTT . SASNMHT . SASNMAT . 

*  SASON , SASOFF . CNTPER , CNTPEO , CNTAGE . CNTEQP . CNTPRT . CNTON . CNTOFF 
C 

COMMON  /SAS/  SASt .SASa.SAS3.SAS4.SAS5.SAS6.SAS7 .SAS8.SAS9.SAS10. 

*  SAS 1 1 . SAS 12 . SAS 13 , SASLST ( 9. 63 ) , SASDAM( 9.63). SASEQP ( 99 . 63 ) . 

-  SASCAN ( 3199.9,63), SASNMH( 9 , 63 ) , SASNMA ( 9 , 63 ) . SASPRT ( 3 1 99 . 63 ) . 

*  SASPER ( 320.63) , SASPEO ( 320,63 ) , SASAGE (99.63), SASOAMT (9,63), 

*  SASLSTT ( 9.63), SASNMHT (9.63), SASNMAT (9,63), SASON( 9,30). 

*  SASOFF (9, 30 ) ,CNTPER( 320. 63) . CNTPEO( 320, 63). CNTAGE (99,63 ) , 

*  CNTEQP (99.63). CNTPRT ( 3199,63). CNTON( 9.30). CNTOFF ( 9.30) 

C 

C«» . . .  COMMON  SAS  . . . 


2.  INSERT  COOE  AFTER  LINES 


C  DIMENSION  THE  STORAGE  ARRAYS  FOR  THE  VARIOUS  TASK  REQUIREMENTS 
C  NOTSK  MAY  NOT  EXCEEO  5000 
NOTSK  -  2500 
NOTSKA  «  200 


CODE  TO  BE  INSERTED 


C 

C 


OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH,  1987 
NOREP  *  1400 
SAS  OUTPUT  PROCESSOR  MOO 


3.  INSERT  CODE  AFTER  LINES 


C 

C 


WXDAYS  MAY  not  BE  GREATER  THAN  65 
WXDAYS  »  65 


COOE  TO  BE  INSERTED 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH,  1987 

JB  »  1 

3000  DO  3020  JA  *  1.MAXT 
SASLST ( JA . JB  )  =  0 
SASLSTT ( OA , J8  )  =  0 
SASOAMl JA , JB  )  *  0 
SASOAMT ( JA , JB )  *  0 
SASNMA ( JA , jB  )  -  0 
SASNMAT( JA. JB)  *  0 
SASNMH( JA. JB)  »  0 
SASNMHT (JA. JB)  «  0 
3020  CONTINUE 

IF  (JBEO.MAXB)  GO  TO  3040 
JB  »  JB  *  1 
GO  TO  3000 
3040  JB  ■  1 

3060  00  3080  JA  «  1.NOPEOP 

SA$PER( JA , jB  )  «  0 
CNTPER( JA. JB)  ■  0 
CNTPEO( JA, JB)  •  0 
SA$PEO( JA , jB  )  •  0 
3080  CONTINUE 

IF  (JB  EQ.MAXB)  GO  TO  3100 
JB  ■  J8  ♦  1 
GO  TO  3060 
3100  JB  *  1 

3120  00  3140  JA  *  1 . NOAGE 

SASAGE ( JA. JB)  *  0 
CNTAGE ( JA, JB)  •  0 
CNTEOP( JA, JB)  *  0 
SASEQP(JA, JB)  ■  0 

A- 2 


^  ’•''A*:*?**;* 


CONTINUE 

IF  (JB.EQ.MAXB)  GO  TO  3160 
JB  *  JB  +  1 
GO  TO  3120 

JB  *  1 

DO  3200  JA  •  1. NOPART 
CNTPRT ( JA , JB )  *  0 
SASPRT( JA. JB)  *  0 
CONTINUE 

IF  (JB.EQ.MAXB)  GO  TO  3220 
JB  *  JB  ♦  1 
GO  TO  3180 


DO  3320  JA  *  1. NOPART 
SASCAN(JA. JB. JC)  «  0 
CONTINUE 

IF  (JB.EQ.MAXT)  GO  TO  3340 
JB  *  JB  +  1 
GO  TO  3300 

IF  (JCEO.MAXB)  GO  TO  3360 
JB  *  1 
JC  =  JC  *  1 
GO  TO  3300 
JB  *  1 

00  3370  JA  *1.30 
SASON(JB.JA)  *  O 
SASOFF ( JB . JA )  *  0 
CNTON(JB.JA)  *  0 
CNTOFF ( JB . JA  )  *  0 
CONTINUE 

IF  (JB.EQ.MAXB)  GO  TO  3375 
JB  *  JB  +  1 
GO  TO  3365 
CONTINUE 

SAS  OUTPUT  PROCESSOR  MOO 


m 


TA8  B 

SUBROUTINE  INPUT 
1 .  INSERT  COMMON 


C  OTI  SAS  OUTPUT  PROCESSOR  MOD  1  MARCH.  1987 

C 

. . - . .  COMMON  SAS 

C 


INTEGER  *4  SAS 1 . SAS2 , SAS3 . SAS4 . SAS5 , SASS , SAS7 . SAS8 . SAS9 . SAS 10 . 

*  SAS 1 1 . SAS 12 . SAS13.SASLST. SASDAM , SASPER , SASPEO , SASAGE . SASEQP  . 

*  SASCAN. SASNMH. SASNMA . SASPRT , SASDAMT , SASLSTT , SASNMHT . SASNMAT , 

-  SASON. SASOFF . CNTPER , CNTPEO . CNTAGE , CNTEQP . CNTPRT , CNTON , CNTOFF 
C 

COMMON  /SAS/  SAS 1 . SAS2 , SAS3 , SAS4 , SAS5 , SAS6 , SAS7 , SAS8 . SAS9 , SAS 10. 

*  SAS 1 1 . SAS 12. SAS 13 , SASLST (9,63), SASDAM(9, 63) . SASEQP ( 99 , 63  )  . 

*  SASCAN( 3199,9,63). SASNMH ( 9 , 63 ) . SASNMA (9,63), SASPRT (3199,63). 

-  SASPER(320,63) , SASPEO( 320, 63), SASAGE (99,63 ).SASOAMT( 9,63) . 

*  SASLSTT (9, 63) . SASNMHT (9 ,63) , SASNMAT (9,63  )  , SAS0N(9 , 3Q  )  . 

*  SASOFF (9, 30) .CNTPER (320. 63) , CNTPEO ( 320 , 63 ). CNTAGE ( 99 , 63  )  . 

*  CNTEQP (99. 63 ) . CNTPRT ( 3 1 99 , 63 ) . CNTONt  9,30), CNTOFF (9 , 30) 


C 

. . .  COMMON  SAS  *•*****• 

REPLACE  LINE  WITH  : 

C  OTI  SAS  OUTPUT  PROCESSOR  MOD  1  MARCH.  1987 

20  GO  TO  (21.22.29.292,294,295.270)  J 
C  SAS  OUTPUT  PROCESSOR  MOO 


2.  INSERT  CODE  AFTER  LINES 


2931  FORMAT ( '  ONLY  25  ITEMS  MAY  BE  LISTED  DURING', 

X  •  ANY  SINGLE  RUN  WITH  SUBRUTINE  QUEUES'  ) 

GO  TO  2 

CODE  TO  BE  INSERTED  : 


C  OTI  SAS  OUTPUT  PROCESSOR  MOD  1  MARCH.  1987 


270 

SAS  1 

=  0(1) 

SAS2 

=  0(2) 

SAS3 

=  0(3) 

SAS4 

»  0(4) 

SAS5 

=  0(5) 

SAS6 

=  0(6) 

SAS7 

=  0(7) 

SAS8 

=  0(8) 

SAS9 

=  D  (  9  ) 

SAS10 

=  0(10) 

SASl  1 

=  0(11) 

SAS  1 2 

=  0(12) 

SAS  1 3 

•  D( 13) 

IF 

(SASl 

NE  1 )  GO 

TO 

880 

wr: 

[TE  (81 

.  1870  ) 

WRITE  (81 

. 1880) 

880 

IF 

(  SAS2 

NE  1 )  GO 

TO 

940 

WR! 

(TE  (82 

. 1890) 

Wfl  ! 

[TE  (82 

. 1900) 

940 

IF 

(SAS3 

NE  1  )  GO 

TO 

990 

Wfl! 

[TE  (83 

.1910) 

WR! 

[TE  (83 

. 1900) 

990 

IF 

(SAS4 

NE  1 1  GO 

TO 

1083 

WRITE  (84 

.  1930  ) 

WRITE  (84 

.  1920  ) 

1083 

IF 

(  SAS5 

NE  1 )  GO 

TO 

1  145 

WRITE  (85 

. 1940) 

WR! 

[TE  (85 

.  '950  ) 

1  145 

IF 

(SAS6 

NE  11  GO 

TO 

1205 

WR! 

[TE  (86 

.  1960  ) 

WRITE  (86 

. 1 900 ) 

1205 

IF 

(SAS7 

NE  1  )  GO 

TO 

1260 

WRITE  (87 

. 1970) 

WRITE  (87 

. 1990) 

1260 

IF 

(SA$8 

NE  1 )  GO 

TO 

1320 

WR! 

[ TE  (88 

.  1980) 

WRITE  (88 

. 1990) 

1320 

IF 

(SAS9 

NE  1 )  GO 

TO 

1380 

WR! 

i  TE  (89 

,  2000) 

WR! 

!TE  (89 

.1990) 

A- 4 


I F  <  SAS 10 . NE  .  1  )  GO  TO  1440 
WRITE  (90.2010) 

WRITE  190.1990) 

IF  ( SAS 1 I.NE.I)  GO  TO  1460 
WRITE  (91.2020) 

WRITE  (91.2030) 

IF  ( SAS 1 2 . NE  .  1 )  GO  TO  1480 
WRITE  (92.2040) 

WRITE  (92.2030) 

IF  ( SAS 1 3  NE . 1 )  GO  TO  1500 
WRITE  (93.2060) 

WRITE  (93.2050) 

CONTINUE 

FORMAT  ('  SAS  1  *  1  SORTIES  FLOWN  AND  DEMANDED/BASE /AC FT  TYPE/' 
•  ' ACF T  MISSION/PRIORITY') 

FORMAT  ('  TRIAL  DAY  BASE  TYPE  MX  PRI  FLOWN  DEMANDED 1  ) 
FORMAT  ('  SAS2» 1  NUMBER  OF  ACFT  LOST /BASE/ ACF T  TYPE') 

FORMAT  ('  TRIAL  DAY  BASE  TYPE  *') 

FORMAT  ('  SA$3«1  NUMBER  OF  ACFT  OAMAGED/BASE/ACFT  TYPE') 

FORMAT  ('  TRIAL  DAY  BASE  TYPE  PART  *') 

FORMAT  (  SAS4*i  NUMBER  OF  CANS /BASE /ACFT  TYPE/PART') 

FORMAT  ('  SAS5* 1  NUMBER  NMCS  HOURS/BASE/ ACFT  TYPE') 

FORMAT  ('  TRIAL  DAY  BASE  TYPE  HOURS') 

FORMAT  ('  SAS6-1  NUMBER  NMCS  AC FT /BASE/ ACFT  TYPE') 

FORMAT  (•  SAS7=  1  ON-EQP  DELAY  T IME ( MI NUT E S )/BASE/PERSONNEL ' . 


FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( ' 

•  TYPE  '  ) 
FORMAT  ( ' 

*  •  type  '  ) 

FORMAT  ( ' 
FORMAT  ( ' 
FORMAT  ( 
FORMAT  ( ' 
FORMAT  (  ' 
FORMAT  ( ' 
FORMAT  ( ■ 
FORMAT  ( ' 


SAS8*  1  OFF-EQP  OELAY  TIME  (MINUTES )/BASE/PERSONNEL '  , 

TRIAL  DAY  BASE  TYPE  TIME  *') 

SAS9*  1  ON-EQP  DELAY  TIME(MINUTES )/BASE/AGE  TYPE') 
SAS10*1  OFF-EQP  DELAY  TIME ( MINUTES ) /BASE/AGE  TYPE') 
SAS11*1  DELAY  TIME(MINUTES)/BASE/PART  NUMBER') 

TRIAL  DAY  BASE  PART  TIME  Y ' ) 

SAS  1  2 *  1  ON-EQP  TASK  T IME ( MINUTES ) /BASE/SHOP ' ) 

TRIAL  DAY  BASE  SHOP  TIME  #') 

SAS13-1  OFF-EQP  REPAIR  T IME (MINUTES )/BASE/SHOP ' ) 


SAS  OUTPUT  PROCESSOR  MOO 


N*  %Vy\Vl' 


•  ■  ■  ».  I  'V  9  •.  ■  ^  9^ 


TAB  C 


SUBROUTINE  OUTPUT 
1 .  INSERT  COMMON 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH,  1987 

C 

C*  *  **  * . . .  COMMON  SAS  . 

C 


INTEGER  *4  SAS1 . SAS2 . SAS3. SAS4. SAS5 , SAS6, SAS7 , SAS8. SAS9. SAS '0. 

•  SAS 1 1 . SAS 12 , SAS 13. SASLST .SASDAM. SASPER , SASPEO , SASAGE . SASEQP. 

-  SASCAN. SASNMH, SASNMA , SASPRT , SASOAMT , SASLSTT , SASNMHT . SASNMA T , 

•  SASON . SASOFF . CNTPER . CNTPEO , CNTAGE , CNTEQP . CNTPRT . CNTON , CNTOFF 
C 

COMMON  /SAS/  SAS  1  . SAS2. SAS3.SAS4 , SAS5 , SAS6 , SAS7 , S ASS . SAS9 , SAS 10, 

•  SAS 1 1 . SAS 12 . SAS 1 3. SASLST (9.63) , SASOAMI 9, 63)  , SASEQP ( 99 , 63 ! . 

•  SASCAN1 3199. 9,63) . SASNMHl 9 . 63 ) , SASNMA) 9 . 63  )  . SASPRT ( 3 1 99 . 63 ) . 

•  SASPER ( 320.63 ) , SASPEO ( 320 . 63 ) . SASAGE ( 99 , 63  )  , SASDAMT (9,63  )  , 

-  SASLSTT (  9.63) . SASNMHT ( 9 ,63) . SASNMAT (9,63 ) . SAS0N(9 . 30) . 

•  SASOFF (9, 30) , CNTPER (320, 63) , CNTPEOf 320,63) , CNTAGE ( 99 , 63) . 

•  CNTEQP ( 99 . 63  )  . CNTPRT ( 3199.63), CNTON ( 9 , 30 ) . CNTOFF ( 9.30) 

C 

. .  COMMON  SAS  . . . 


2  INSERT  COOE  AFTER  LINES 


C 

C 

C 

C 


CONTINUE 
MDAY  *  NODAY 

IF  (  IOAY  .EQ.  2)  MOAY  -  ( NODAY ♦ 1  )  / 2 
IF  (IDAY  EQ.  3)  MDAY  ■  (N00AY*2)/3 

MODIFY  BREAK  RATES  AS  APPROPRIATE 

IF  (VBREAK  EQ  1)  CALL  BREAK 

IF  ((PRINT  LT  1)  AND  INTRIAL  EQ. 


1  )  ) 


GO  TO  50 


CODE  TO  BE  INSERTED 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH,  1987 
IF  (SAS1  NE . 1 )  GO  TO  880 
<JM  *  1 

JA  *  1 

JB  *  1 

800  DO  820  JP  *  1,6 

IF  (0UTPT1(  1  ,  JP. JM.UA.UB) ,NE  0) 

*  WRITE  (81,1780)  ITRIAL .NOOAY , JB, oA . JM, JP.OUTPT 1 ( 2 , JP. JM. JA . JB  )  . 

*  OUTPT 1 ( 1 , JP . JM. JA , JB  ) 

820  CONTINUE 

IF  (JM  EQ  MAXM)  GO  TO  840 
JM  «  JM  *  1 

GO  TO  800 

840  IF  (  JA  EQ  MAX T  )  GO  TO  860 
JM  »  1 

JA  *  JA  *  1 

GO  TO  800 

860  IF  (JB  EQ  MAXB)  GO  TO  880 
JM  *  1 

JA  ■  1 

jB  •  JB  *  1 
GO  TO  800 

880  IF  (SAS2  NE  1  )  GO  TO  940 

JB  •  1 

900  00  920  JA  »  1 , MAXT 

IF  (SASLSTf JA, JB)  NE  0) 

*  WRITE  (82,1800)  ITRIAL. NOOAY. JB,JA,SASLST(JA,JB) 

SASLSTTf JA , JB )  *  SASLSTT ( JA , JB )  *  SA S L ST ( JA . JB  ) 

920  CONTINUE 

IF  ( JB  EQ  MAXB)  GO  TO  940 
JB  ■  JB  ♦  1 
GO  TO  900 

940  IF  (SAS3  NE  1  )  GO  TO  990 

JB  *  1 

960  DO  980  JA  »  1  ,  MAXT 

IF  ( SASOAM( JA . J8 )  NE  0) 

*  WRITE  (83.1800)  I  TRIAL .NOOAv  .  JB . JA . SASOAMf JA , JB ) 

SASOAMTf JA , JB  )  *  SASOAMT! JA . JB )  *  S A SDAM ( JA . jB 1 

980  CONTINUE 

IF  (JB  EQ  MAXB)  GO  TO  990 
JB  •  JB  *  1 
GO  TO  96C 

1  990  IF  ISAS4  NE  1 )  GO  TO  1080  *  , 


JB  *  i 

1020  00  1040  JP  *  1. NOPART 

IF  <SASCAN< JP. JA, JB)  NE  0) 

•  WRITE  (S4.1B05)  I  TRIAL . NOOAV , JB , JA , JP . SASCAN( JP.JA.J8) 
SASCANI JP. JA, JB)  ■  0 

1040  CONTINUE 

IF  (JA  EO.MAXT)  GO  TO  1060 
JA  ■  JA  *1 
GO  TO  1020 

1060  IF  (JB  £0  MAXB )  GO  TO  10S0 
JA  •  1 

JB  *  JB  ♦  i 
GO  to  !020 

1080  IF  (SASS  NE  1 )  GO  TO  1140 

JB  •  i 

i lOO  00  1 120  JA  *  1 . MA x T 

IF  (  SASNMHI  JA  .  JB  )  NE  0) 

•  WRITE  (85.1800)  ITRIAL .NOOAV .Jt.JA . SASNMM( JA ,JB 1 
SASNMHT( JA.JB)  *  SASNMHT ( JA . JB )  *  SASNMHI JA . JB > 

1 ' 20  CONTINUE 

IF  (JB  £0  MAXB)  GO  TO  1140 
JB  *  jB  ♦  i 
GO  TO  ’ 100 

1140  IF  ( SAS6  NE  1 )  GO  TO  1200 
JB  *  ' 

1160  DO  1  180  JA  ■  1  .  MAX T 

IF  I SASNMAf JA . JB )  NE  0) 

•  WRITE  (86.1800)  ITRIAL. NOOAV ,JB.JA.$ASNMA( JA.JB) 
SASNMAT (JA.JB)  •  SASNMAT ( JA . JB  )  *  SA SNMA ( JA . JB ) 

1 180  CONTINUE 

IF  ( jB  EO  MAXB)  GO  TO  1200 
JB  ■  JB  ♦  1 
GO  TO  1 160 

1200  IF  (SAS7  NE  1  )  GO  TO  1260 

JB  *  i 

1220  00  1240  JA  ■  VNOPEOP 

IF  ( SASPERl JA.JB)  NE  O ) 

•  WRITE  (87  1 8 '0  »  ITRIAL .NOOAV . JB.JA .( 3*SASPER( JA. JB  ))  . 

-  CNTPERI jA . jB  ) 

SASPERl  JA  .  jB  I  -•  0 

'240  CONT I NUE 

IF  (  ^.B  £0  MAXB)  GO  TO  1260 
jB  *  jB  ♦  1 
GO  TO  1220 

1260  IF  (SAS8  NE  1  I  GO  TO  1320 

JB  «  1 

1280  OC  *300  JA  *  '.NOPEOP 

IF  ( S A  SPEC ( JA.JB)  NE  0) 

«  wR  I  *  E  (88.1810)  I  TRIAL . NOOAV . JB . JA .( 3*SASPE0( JA . JB )) . 

•  CNTPEOI JA . JB  ) 

SASPEOI JA . JB  )  *  0 

1300  CONTINUE 

if  i je  EO  MAXB)  GO  TO  1320 

j6  *  jB  ♦  1 
GO  TC  1280 

1320  IF  i  SAS9  NE  1  )  GO  TO  1380 
JB  *  ' 

1 34C  OC  '360  JA  »  1 , NOAGE 

I f  ( SASAGE ( JA.JB)  NE  0) 

-  WRI'E  (89.1815)  ITRIAC .NOOAV . JB . JA . ( 3*SASAGE( JA . JB I ) . 

-  "NT AGE ( JA . JB ) 

SASAGE ( JA . JB  )  ■  0 

'360  CONTINUE 

:c  i JB  EO  MAXB)  GO  TO  1380 
JB  -  .8  *  1 
GO  TO  '340 

•380  Ir  (SAS’O  NE  ’ I  GO  To  1440 
;B 

•JOC  00  '420  -A  *  '.NOAGE 

: f  ■  SASEQP' jA , JB  )  NE  0) 

•  WRITE  (90.1815)  ITRIAL . NOOAV  . jB. JA .( 3*SASE0P( JA . JB  I  ) . 


•  CNT  E  OP ( JA.jB) 
S*SEOP<  JA  jB  )  ■  0 


4  2C 

CONTINUE 

IF 

( JB  EO  MAXB  ) 

GO 

TO 

1440 

uB 

*  JB  *  1 

440 

IF 

( SAS 1 ’  NE  1  ) 

GO 

TO 

1500 

jB 

»  ' 

460 

00 

1480  JA  *  1  , 

NOPART 

IF 

( SASPRTl JA . 

JB  ) 

NE 

0) 

•  WRITE  19*.  1820)  ITRIAL .NOOAV . JB  JA .( 3*SASPRT( JA . JB  )  I  . 

•  CNTPRTI  JA  .  JB  ) 

SASPRT ( uA . JB  )  *  0 


3 


1410  CON'  INuf 

IF  ’  B  £0  MA'B)  30  '0  ’ 500 
jB  •  jB  ♦  i 
GO  T  0  ' 460 

1500  IF  ( S4S i 2  NE  ’)  30  TC  ’5’5 

J8  ■  ' 

1505  00  ' 5C7  uA  •  ’.30 

IF  t  SASON(  ,  jA  )  NE  0  ) 

•  WRITE  19;  1815)  ITHIAl .NODA» . jB . j4  1 3‘SiSOM  j6 . j*  )  1 

•  CNT QN( j| . jt  I 

SASON) vl  JA)  *  0 
1507  CONTINUE 

IF  (  jB  £0  ma*B>  GO  TO  i5i5 
J8  •  JB  *  1 
GO  to  1505 

1515  IF  ( SAS 1 3  N£  • )  30  T0  1530 

J8  •  1 

1520  00  1525  jA  •  1,30 

IF  (  SaSOFF ( jB. JA  >  NE  0) 

•  WHITE  (93  18*5)  ITBIAL .NOOAv , J8 . JA , ( 3-SASOFF i  jB  JA I < 

•  CNTOFF ( jfl . jA  I 
SASOFF( jB. jk t  *  C 

1525  CONTINUE 

Ic  (  jB  £0  MaxB )  30  T0  ’5  30 

oB  *  jB  •  ’ 


GO  *0 

520 

1530 

CONTI  So 

f 

1780 

FORMA' 

t  di  lb 

2 

> 

1800 

FORMAT 

i  5<  16 

* 

» 

'805 

FORMAT 

(  4t  16 

<A 

1  . 

16  J 

.16  1 

18  10 

FORMAT 

(  3 1  I  6 

2 

)  . 

16  3 

.2(16  >  i 

1815 

forma- 

(  to  1  I  b 

« 

1  J 

1820 

FORMAT 

(  3  (  1  to 

2 

)  , 

16  4, 

.2(16  1) 

1840 

FORMA ’ 

i 

DA  1 

.  14.  ;y 

TRIAL  .1421. 

BASE 

14  2  >  AIRCRAFT 

•  '  ,PE 

.  14 .2* 

«  OamaGEC 

14.2K  .  •  lCST 

14  I 

1850 

FORMA' 

(  SAS 

END  OF 

DA i  SUMMARY  ) 

i860 

FORMAT 

( 

OAy 

.14.2* 

TRIAl  .14.2*. 

BASE 

14  2*  AIRCRAFT 

•  type 

•  4 , 4.  A 

»  NMCS  .  14 

2*  »  NMCS  HOURS 

.14) 

C  SAS  Output  processor  moo 


INSERT  CODE  AFTER  „ I NE 
162  CONTINUE 
CODE  TO  BE  -.NSER'EC 


C  or:  SAS  OUTPUT  PROCESSOR  MOO  I  MARCH.  -987 

IF  ( SAS2  £0  ’  OH  S*S3  EO  1  OR  S*S5  EO  ’  OR  SAS6  EO  1  ) 

•  WRITE  (6. ’850) 

IF  ( SA S 2  NE  i  ANO  SAS3  NE  ’  )  30  TC  'TO 
B  *  i 

165  00  ”0  .A”  MA  x  T 

:  F  I  SASL.STI  UA  .  JB  I  NE  C  OR  SASOAM)  jA  .  jB  )  NE  0) 

-  wRI"E  (6.1840)  1  NOO  A  »  I'RIAl  JB  .  JA  .  SASDAMi  _a  .  jB  )  .  SAS.  S’(  uA  ,  UB  )  ) 
’TO  ON’ I NUE 

I  F  (  .0  f  Q  MA  <0  )  GO  TO  ’  75 
jB  •  ♦  ’ 

30  TO  165 

175  IF  ( SAS5  NE  •  AND  SAS6  NE  i  I  GO  TO  195 
jB  *  • 


17' 

’  8C 

183 

185 

’90 

•95 


00  ’80  JA* ’  . MA  *  T 

IF  ( SASNMAi JA . J0  )  NE  C  OR  SASNMH( uA . jB  )  NE  0 > 

WHITE  (6.  <8501  l  NOOAV  ,  t  trial  .  JB.  jA  .  SASNMAI  JA  .  ^.B  >.  SASNMHI  jA  .  uB  >  ) 
CONTINUE 

if  ( JB  E  2  MA  <8  »  30  TO  183 
JB  •  JB  *  ’ 

GO  TO  ’'7 

jB  • 

DO  190  j A  * i  , MA  A  T 

SAS-ST >  JA . uB  )  *  D 

FASCAMf „A , JB  i  ■  0 
SASNMH1  jA . jB  )  •  o 

SASNMA I  uA  .  J0  I  *  0 
‘ONTINUE 

if  I  _e  £.:  MA«B  I  GO  ’0  ’95 
--  .,e  *  • 

GO  '0  '85 
COM  INuE 

SAS  CjtPjT  PROCESSOR  MOO 


A- 8 


ft'  *1* 


o  o  n  noon 


SURROoUNE  SuMup 
1  INSERT  COMMON 


OM  $AS  OUTPUT  PROCESSOR  MOO  1  MARCH.  <RRT 

. . COMMON  SAS  . 

INTEGER  *4  SAS' ,SAS2.SAS3.SAS«.S*SS.SAS«.SAS7.SASR.SASR.SAS10. 

’  S*S *  1  SAS '2  SAS' 3 . SASLST . SASDAM. SASPER. SASPEO. SASAGE . SASEQP 

*  S*SC AN . SASNMH . SASNMA . SASPRT . SASOAMT . SASLSTT , SASNMHT . SASNMAT . 

*  SASON. SASOPP . CNTPER.CNTPEO.CNTAOE .CNTIOP. CMTPRT.CNTON.CNTOPP 

common  /SAS/  SASi  SAS2.SAS3.SAS4.SAS5.SASC.SAS7SASR.SAS9.SAS 10 

*  SASI 1  SAS  12. SAS 1 3 . SASlST <  9 . C3 ) . SASOAMt 9 . S3 ) . SASCQPt 99 ,C3 ) . 

'  SASCANI 3 199.9.63) . SASNMH ( 9 . C3 ) . SASNMA ( 9 . S3 ) . SASPRT ( 3 199  63  I . 

*  SASPERl 320.63  )  SASPEOI 320.63) , SASAGE (99.63). SASOAMT (9.63  I  . 

*  SASlSTT(9  63). SASNMHT (9. 63). SASNMAT (9.63). SASONI 9. 301. 

*  SAS0PM9. 30)  CNTPER(320  63  )  .  CNTPEOI  320 . 63  )  .  CNTAGI  (  99  63). 

*  CNTEOPI 99.63 ) .CNTPRTI 3199.63 ) . CNTON( 9 , 30) . CNT0PPI9. 30) 

.  COMMON  SAS . . . 


2  INS£RT  COOE  APTER  LINES 
132  CONTINUE 

<4R  I  T  E  (  6  .  1066  >  (N0RHRSI9  )  .8*  i  .NRASE  ) 


COOE  TO  BE  INSERTED 


C  OM  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  1987 

I P  ( SAS2  E  3  ’OR  SAS3  EO  1  OR  SASS  EO  1  OR  SAS6  EO  1) 

•  MR  1 t  E  (6.2010)  1TR1AL 

IP  ( SAS2  NE  1  ANO  SAS3  NE  II  GO  TO  4)5 
jB  *  1 

400  DO  4  to  JA  «  <  . MA  <  T 

IP  ( SASLSTTi WA . jB  I  NE  0  OR  SASOAMT ( JA . JB )  NE  0) 

•  -RITE  (6.20001  i JB . JA  SASOAMT ( JA. JB >. SASLSTT I jA .JB)  > 

SASlST  T (  JA ,  jB  )  •  0 

SASOAMT ( jA . JB 1  *  O 
410  CONTINUE 

IP  ( JB  EO  MAXB )  GO  TO  420 
JB  ■  JB  *  1 
GO  TO  400 

415  IP  ( SASS  NE  1  ANO  SAS6  NE  1 )  GO  TO  135 
420  JB  «  ’ 

440  DO  450  J4* 1  . MAX  T 

IP  ( SASNMAT ( JA .JB )  NE  0  OR  SASNMHT  (  JA . JB)  NE  0) 

•  WRITE  (6.2020)  ( JB . JA . SASNMA T< JA . JB ) . SASNMHT! JA . JB  )  ) 
SASNMAT ( JA , ^B )  *  0 

SASNMHT! JA . JB  )  «  0 
450  CONTINUE 

I P  ( JB  EO  MAXB  )  GO  TO  135 
JB  *  JB  ♦  1 

GO  TO  440 

C  SAS  OUTPUT  PROCESSOR  MOO 


3  INSER’  COOE  AFTER  LINES 

1215  FORMAT!  0  .20*.  FRACTION  SORTIES  OP  AIRCRAFT  TYPE  .12.  That 
X  land  with  N  UNSCHEDULED  ON-EQUIPMENT  BREAKS  ./.'  .  25X.917, 

X  >=  .12. 7X.  TOTAL  '.TASKS/SORTIE'./.'  ' , 10X . 

x  DEFERABLE  .5X.10F7  4.5X.P7  4./.  '  .  10X .  ' I MMED I  ATE  ,5X, 

<  1 0P  7  4 , 5  < . F  7  4./.'  ■.  12X.  EITHER’  ,7X.  10P7  4.5X.F7  4.4X.F7  3) 


COOE  TO  BE  INSERTEO 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  1987 

2000  format  (’  BASE 14 . 2X  ,  -AIRCRAFT  TYPE  ■.14.2X.-0  DAMAGED  .14 

* ,2X . ’ »  LOST  .14) 

2010  FORMAT  ('  SAS  SUMMARY  FOR  TRIAL  »  ’.15) 

2020  FORMAT  <  BASE 14 . 2X  .  ’AIRCRAFT  TYPE  '.I4,2X,’W  NMCS  .I4.2X 

■ . ' *  NMCS  HOURS  .14) 

C  SAS  OUTPUT  PROCESSOR  MOD 


A- 9 


uuuu 


SUMOotinC  MNfS 


I  INSERT  COMMON 


OT!  sas  Output  PROCESSOR  moo  '  mabc«  ‘9$? 
.  COMMON  SAS  . 

INTEGER  -4  SAS'SAS2  SAS3  SAS4  SASS . SAS6  SAS7  SAS6  SAS9  SAS ’0 

•  SAS' i  ,SAS<2  SAS’3  SASlST  SASOAM  SASPER  SASPEO  SASAGE  SASEQP 

■  SASCAN  SASMMH  SASMIA , SASPRT  SASOAMT  SASlSTT  sasnmmt SaSNMA' 

•  SASON. SASOFF  CNTPEB  CNTP£0  CNTAGE  CNTEOP  CNtPBT  CNTQN  CNTOFF 

COMMON  / SA5/  SASi.SAS3SAS3.SAS4.SASSSAS6SASTSASB.SAS9  SAS'O 

•  SASl 1 . SAS'3  SAS  13 . SASLSTI 9  S3  I . SASOAMi 9  63 >  SASEQP t 99  63 ) 

•  SASCANI 3199.9.63 ) . SASNMHI 9.63 )  SASNMAl 9  63  1. SASPBT( 3  i  99  S3  1 

•  SASP£B( 320.63) . SASPEOI 330.63  I . SASAGE I  99.63 1  SASDAMTf B  63) 

•  SASLSTTI  9.63*.  SASNMHT  (9.63).  SASNMATi  9.631  SAS0NI9  30' 

■  SASOFF ( 9.301  CNTPEB  (  330 . 63 ) . CNTPEOl 330 . 63 ) . CNTAGE ( 99  63) 

•  CNTE0P(99  63) .CNTPRT)  3199.63  )  CNT0NI9  30  I  . CNTOF F I  9 . JO > 

. . COMMON  SAS  . 


1  INSFBT  COOE  AFTER  ..  INES 


:  K I  NO  • '  :s  AN  ON-EQulPMENT  -ASF. 

C  »2  :s  an  OFF -EQUIPMENT  REPAIR. 

C  » 3  IS  an  age  REPAIR  jOB 


COOE  TO  be  inserted 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  i  MABCW  '987 

NOD A  1  «  DA> (NOW) 

C  SAS  OUTPUT  PROCESSOR  MOO 


3  INSERT  COOE  AFTER  LINES 


’0  OuTSHPf  •  .SHOP. BASE  )  «  3uTSHP(  1 . SHOP . BASE  )  ♦  * 

OuTShP(3.shOP.BASE )  *  0UT5MP( 2  SHOP  BASE  )  *  time 
OutshP< 3 . SHOP . BASE )  *  OUTShPi 3 . SHOP . BASE  )  ♦  •  •  ” I  ME ■ *  I  ME 


CODE  to  BE  INSERTED 


C  OTI  SAS  OuTPjT  PROCESSOR  MOD  '  MARCH,  i987 

SASON( BASE . SHOP )  •  SASONI BASE . SHOP )  ♦  TIME 
CNTONI BASE . SHOP  )  *  CNTONI BASE  . SHOP  I  *  • 

C  SAS  OUTPUT  PROCESSOR  MOD 


4  INSERT  CODE  AFTER  LINES 


20  OUTSHP( 4 . SHOP . BASE )  ■  OutSmPi 4 . SHOP . BASE  )  *  ’ 

OUTSHPI 5 . SHOP . BASE )  •  OUTSHPI 5 , SHOP . BASE  )  *  time 
0UT$HP<6 . SHOP . BASE )  •  OUTSHPI 6  SHOP . BASE  )  *  '*TIME*'IME 


COOE  TO  8E  INSERTED 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  i  MARCH.  i987 

SASOFFIBASE . SHOP  )  •  SASOFF ( BASE . SHOP  )  ♦  time 
CNTOFF! BASE  . SHOP )  •  CNTOFF I  BASE . SHOP  )  ♦  ' 

C  SAS  OUTPUT  PROCESSOR  MOO 


s  :nse»'  act  *fT£B  lines 


I 


If  I  Oo  T  €  B »  '  T.Pf  BASE  I  GT  JOOCOOOOOO  I  BE  T  URN 
OuTP|R<  t  T .P£  BASE >  •  OUTPERl  1  TyP|  BASE  )  *  ADOl 
OuTP£R(2  NPi  BiStl  •  OuTPERI 2 . T»P£ .BASE  >  ♦  A002 


coos  to  be  insisted 


o’!  SAS  OuTPuT  PROCESSOR  **00  '  MARCH  (9B7 

SA$P£8(  TyP£  BASE  I  •  SASPESI  T »P£  BASE )  *  T  I  WE 
CNrP£*l T >PE  BASE  I  ■  CNTPEBI TyPE  .  BASE >  ♦  ' 

SA$  Ou TPu T  PROCESSOR  woo 


6  INSEB’  .306  kf  '68  l I NE S 


Ou’ AGE  I  ' 
Dotage i 2 


<P6  BASE  > 
>PE  BASE > 


OUTAGE l 1  .7 'PE  BASE ) 
OUTAGE) 2  TYPE  BASE ) 


:goe  rc  86  insisted 


O';  >A$  Oo  t  ®u  t  PROCESSOR  WOO  1  WA8CH.  (987 

SASAGE'"'PE  BASE  I  ■  SASAGEI  TYPE  BASE  I  ♦  1 
CNTAGE'*-P£  BASE  I  *  CNTAGE ( t ,pe . BASE )  ♦  ' 
SAS  Ou'Pj'  PROCESSOR  AIOO 


INSERT  3C6  kf  £8  .  IN£  S 


300  Do ’PS"  I  • 
To  ”  P 8  '  (  * 


t.E£  BASE)  •  0UTP8TI  1  .  r.PE  BASE)  ♦  AOO t 
•  ■-■‘f  BASE)  0UTP8TI2  T.P£  BASE)  ♦  A002 


TOE  Bf  INSISTED 


C'l  SAS  Co’P«’  PQOCESSOB  MOD  i  MARCH.  (987 

SASPOT i  - . SE  BASE  l  *  SASP8T)  TyPE .8A$£  )  *  TIME 
:VTP8ti'»0E  BASE  I  •  CNTP8T)  TYPE  .BASE »  ♦  ' 

SAS  Co*POT  P8CCESS08  moo 


8  INSEB’  SOOE  A c  T  E  8  DINES 


Ic  1 Do'PEDI ’  T ,PE  BASE l  GT  2QOCOOCOOOI  RETURN 
3_ ' PE0 )  '  " • P E  BASE  I  •  OUTPE  0)  ’  T  y  PE . BASE  )  *  ADO  1 
G.'PEG>2  *'P-  p  A  S  6  )  •  OUTPEOI  2  .  T YP£  .BASE  )  *  A002 


‘CUE  ”C  86  NStS'ED 


I  SA>  D^-PoT  B  SC  S'  £  S  SOR  MOO  t  MARCH,  '987 
A  p?  D  1  T  «  P£  BASE'  *  jASPEO)  T ypE . BASE  )  *  TIME 
.  *<'  3  £  0 1  ’  P£  .BASE  i  >  DNTPEOl  TyPE  ,  BASE  '  ♦  ’ 
So’O.  •  80CESS08  MOD 


I'.jEP'  306  at  -68  .  INES 


3- ' 6  0° 1  '  T » P£  BASF)  ■  3uTE0P(T  TyPE  BASE  )  ♦  AOO 1 
Do’E QP( 2 .  ■ ■ PE  BASE  I  «  0uT£QP(2  T,  PE.  BASE)  »  AD02 


IF  'C  8 £  INSER'EO 


C'l  SAS  Dj’P'jT  P80CESS0B  MOD  1  MABCh,  (987 
SASE jP>  t .P£  .BASE  >  •  SASEOP) tvPE  BASE  )  •  time 
:NTEOP)".PE  base  I  ■  CNTEQP)  T fPE  . BASE >  ♦  ’ 

SAS  :w'P./  OB0CESSC8  MOO 


A- 11 


o  o  o  noon 


SUBROUTINE  PSIFlT 


t  INSERT  COMMON 


OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  1987 
.  COMMON  SAS  . 

INTEGER  *4  SAS  1  .  SASJ  .  SAS3  ,  SAS4  .  SAS3  .  SAS6  .  SAS7.-AS8  .  *jA.  I.  .ASH' 

•  SAS 11 .SAS12.SAS13.SASUST , SASOAM . 5ASPER . SASPEO . SASAGE .  SASEUP. 

•  SASCAN . SASNMH. SASNMA . SASPRT . SASOAMT . SASLSTT . SASNMMT . SASNMAT . 

•  SASON . SASOFF . CNTPER . CNTPEO . CNTAGE . CNTEQP . CNTPRT . CNTON , CNTOF  F 

COMMON  /SAS/  SAS 1 . SAS2 . SAS3. SAS4. SAS5 . SAS6 . SAS7 . SAS8. SAS9. SAS 10 

•  SAS1 1 .SAS 12 . SAS 1 3 . SASLST ( 9 , 63 ) , SASOAM( 9 . 63 ) . SASEQP! 99 ,63 ) . 

•  SASCAN! 3199.9.63) . SASNMH(9 ,63 ) , SASNMA(9.63) , SASPRT!  3199,63) , 

•  SASPERf 320.63 ) . SASPEO ( 320 . 63 ) . SASAGE ( 99 , 63 ) . SASOAMT ( 9 . 63 ) . 

•  SASLSTT ( 9 , S3 ) . SASNMHT ( 9 . 63 ) , SASNMAT ( 9.63). SASON!  9,30). 

•  SASOFF ( 9 , 30 ) , CNTPER { 320.63 ) . CNTPEO ( 320 . 63 ) , CNTAGE) 99 . 63 ) . 

•  CNTEQP1 99.63) . CNTPRT ( 3 1 99 . 63 ) . CNTON! 9 . 30 ) . CNTOF F ( 9 . 30 ) 

. . . .  COMMON  SAS  . 


:  insert  code  after  lines 


SlO  continue 

IF  (BATTLE  NE 
ACN( NAC . 35 )  * 
BASES! 39 .BASE ) 
BASES(47.BASE) 


1  )  GO  TO  5  15 

■  BASES! 39 .BASE  )  ♦  1 
•  BASES (47. BASE  )  ♦  1 


COOE  TO  BE  INSERTED 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH,  1987 

SASDAMUCTVPE.BASE  )  -  SASOAM!  ACTYPE  .  BASE  )  *  1 
C  SAS  OUTPUT  PROCESSOR  MOO 


SUBROUTINE  C ANN  IB 
1  INSERT  COMMON 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  19B7 

C .  COMMON  SAS  . 

C 


INTEGER  *4  SAS1 . SAS2 . SAS3. SAS4 . SASS. SAS6. SAS7 . SAS8. SAS9 . SASIO. 

'  SAS 1 1 .SAS 12 . SAS13.SASLST .SASOAM. SASPER. SASPEO. SASAGE . SASEOP . 

*  SASCAN, SASNMH, SASNMA . SASPRT . SASOAMT . SASLSTT .  S A  SNMHT , S A SNMA  T . 

*  SASON . SASOF  F .CNTPEfl.CNTPEO. CNT  AGE . CNTEQP , CNTPRT , CNTON . CNTQE  f 
C 

COMMON  /SAS/  SAS1 . SAS2 .SAS3.SAS4 . SASS. SAS6 . SAS7 . SAS8 . SASS. SAS 10. 

*  SASH . SAS 1 2 . SAS13.SASLSTI9.63) . SASDAM) 9 . 63 ) . SASEOP (  99 . 63 ) . 

■  SASCAN) 3 199 , 9,63) . SASNMH19 ,63) . SASNMA (  9  63) . SASPRT (  3 199 . 63 ) . 

*  SASPER) 320.63 ) . SASPEO) 320 . 63 ) . SASAGE) 99.63 ) .SASOAMT) 9.63). 

*  SASLSTT) 9.63 ) . SASNMHT ( 9 . 63 ) . SASNMA T (9,63) . SASON) 9. 30) . 

*  SASOF F  <  9 , 30 ) . CNTPER) 320 . 63 ) . CNTPEO ( 320 . 63 ) . CNT AGE (99.63). 

*  CNTEOP) 99,63) .CNTPRT) 3 199 . 63 ) .CNTON) 9. 30) ,  CNT0FM9. 30) 


C 

. . COMMON  SAS  • 

2  INSERT  CODE  AFTER  LINES 

218  CFLAG  *  1 

BASES) 6 . 8ASE  )  •  BASES) 6 . 8ASE  )  ♦  1 


CODE  '0  BE  INSERTED 


C  OTI  SAS  OUTPUT  PROCESSOR  MOD  1  MARCH.  19B7 

SASCANIPART.ACTVPE.BASE  I  *  SASCANIPART .ACTVPE .BASE  I  *  1 
C  SAS  OUTPUT  PROCESSOR  MOD 


subroutine  killac 

1  INSERT  COMMON 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  1987 

C 

C*»«* . . . .  COMMON  SAS . . 

C 


INTEGER  *4  SAS1 .SAS2.SAS3,SAS4,SAS5.SAS6.SAS7,SAS8.SAS9.SAS10. 

•  SAS11.SAS12.SAS13.SASLST, S A SO AM .SASPER.SASPEO. SAS AGE , SASEOP , 

•  SASCAN, SASNMH. SASNMA , SASPRT . SASOAMT . SASLSTT , SASNMHT , SASNMAT . 

•  SA  SON . SASOF  F . CNTPER . CNTPEO . CNTAGE . CNTEOP , CNTPRT . CNTON. CNTOFF 
C 

COMMON  /SAS/  SAS 1 ,SAS2,SAS3.SAS4.SAS5.SAS€.SAS7.SAS8,SAS9.SAS10. 

•  SAS 1 1 . SAS12.SAS13.SASLST(9.S3) . SAS0AM(9.63)  ,SASEOP( 99,63), 

•  SASCAN! 3 1 99 , 9,63 ) . SASNMH(9 ,63) , SASNMA (9 .63) . SASPRT ( 3 199 . 6  3  )  . 

•  SASPERi  320.63 ) , SASPEO! 320 . 63  ) . SASAGE ( 99 , 63  )  , SASDAMT(9,63  )  . 

•  SASLSTT (9, 63) . SASNMHT ( 9,63 ) . SASNMAT ( 9 , 63  )  , SASON( 9, 30) . 

•  SAS0FF(9. 30) , CNTP£R(  320,63 ) . CNTPEO (  320 , 63 ) . CNTAGE ( 99 , 63 ) . 

•  CNTEOP ( 99,63 ) . CNTPRT ( 3 1 99 . 63 ) . CNT0N(9 . 30) , CNTOFF (9,30) 

C 

. . COMMON  SAS . . . . 


2  INSERT  CODE  AFTER  LINES 


IF  (KILL  EO  1)  LOSTAC  *  LOSTAC  +  1 
C 

ACTYPE  *  ACNINAC.  1  )/512 
AID  •  ACNINAC. 2) 

BASE  *  AID  -  100*( AID/100) 

BASES! 3 . BASE  )  -  BASES ( 3 . BASE  )  -  1 

BASES! 20* ACTYPE .BASE  )  «  BASES! 20+ ACT V PE .BASE  )  -  8 
NF  •  BASES!  1 .BASE  ) 


CODE  TO  BE  INSERTED 


C  OTI  SAS  OUTPUT  PROCESSOR  MOD  1  MARCH,  1987 

SASLST(ACTYPE.BASE)  *  SASLST(ACTYPE.BASE)  *  1 
C  SAS  OUTPUT  PROCESSOR  MOD 


immfVflioMviuM 


SUBROUTINE  NORRPT 
1 .  INSERT  COMMON 


C  OTI  SAS  OUTPUT  PROCESSOR  MOO  1  MARCH.  1987 

C . . . .  COMMON  SAS  ••****«• 

C 


INTEGER  *4  SAS1 .SAS2, SAS3, SAS4.SAS5, SASS.SAS7 . SAS8.SAS9.SAS10. 

•  SAS1 1 . SAS12.SAS13. SASLST, SASOAM. SASPER, SASPEO , SASAGE . SASEOP . 

•  SASCAN, SASNMH, SASNMA . SASPRT , SASOAMT , SASLSTT . SASNMHT , SASNMAT  , 

•  SASON . SASOFF , CNTPER . CNTPEO . CNTAGE , CNTEQP . CNTPRT . CNTON . CNTOF F 
C 

COMMON  /SAS/  SAS 1 .SAS2.SAS3.SAS4,SAS5.SAS6.SAS7,SAS8,SAS9.SAS10, 

•  SAS1 1 ,SAS12.SAS13.SASLST(9.63) , SASDAM(9,63) .SASEOP (99 .63)  . 

•  SASCAN( 3199 ,9  .S3)  . SASNMH(9, 63) . SASNMA (9, S3) . SASPRT ( 3 199 , 63 ) . 

•  SASPER(320.63) ,SASPEO(320.63) , SASAGE(99,63) , SASOAMT (9,63), 

•  SASLSTT ( 9,63 ) . SASNMHT (9,63) . SASNMAT (9, 63 ) ,SASON(9, 30) . 

•  SASOFF (9 , 30) , CNTPER( 320 , 63 ) . CNTPEO ( 320 , 63 ) .CNTAGE (99 . 63)  . 

-  CNTEQP <99 .63) . CNTPRT ( 3 1 99 , 63 ) , CNTON ( 9,30), CNTOF F (9,30) 

C 

C . . . .  COMMON  SAS 


2  INSERT  CODE  AFTER  LINES 


ENTRY  RPTNOR(PART,CRIT,NAC,BASE) 


C 

SIGNAL  =  BASE/ 100 
BASE  *  BASE  -  100«SIGNAL 
IF  (SIGNAL  EQ  2)  GO  TO  10 
C 

IF  ( ( NEO+  1  )  GE.  LNOR  )  GO  TO  90 
C 

C  WHEN  A  PRIOR  HOLE  REPORT  IS  BEING  TRANSFERRED.  RATHER  THAN  BEING 

C  REPORTED  FOR  THE  FIRST  TIME.  THIS  FACT  IS  SIGNALED  BY  ADDING  10O 

C  TO  THE  NEW  BASE  NUMBER  AND  NO  ACTION  IS  TAKEN  TO  ORDER  A  PART. 

C 

C  THIS  SUBROUTINE  IS  ALSO  CALLED  BY  “INITSK”  WHENEVER  A  SERVICABLE 

C  PART  IS  USEO  IN  ORDER  TO  CALL  "CONTRL"  TO  CHECK  FOR  A  REPLACEMENT 


C 

c 

r 

c 


IF  (CRIT  GT  33)  CRIT  *  CR1T  -  33 
IF  (CRIT  GT  33)  CRIT  «  CRIT  -  33 


RECORD  THE  NUMBER  OF  AIRCRAFT 
OF  HOLES  ON  AIRCRAFT  4  NAC 


WITH  HOLES.  AND  NOTE  THE  NUMBER 


ACNINAC.22)  =  ACN(NAC,22)  ♦  1 


CODE  TO  BE  INSERTED 


C  OTI  SAS  OUTPUT  PROCESSOR  MOD  1  MARCH.  1987 

ATP  »  ACN( NAC , 1 )/5 12 
A  I XD  *  ACN( NAC , 2 ) 

BAS  -  A I  X D  ~ 1 00 * ( A I X D / 1 00 ) 

SASNMA( ATP .BAS  )  «  SASNMA ( ATP . BAS  )  +  1 
C  SAS  OUTPUT  PROCESSOR  MOC 
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APPENDIX  B 
F-4G  SAS  INPUTS 


SAS  1  =  1  SORTIES  FLOWN  AND  DEMANDED/BASE /ACFT  T YPE/ACFT  MISSION/PRIORITY 


TRIAL 

DAY 

BASE 

TYPE 

MX 

PRI 

FLOWN 

DEMANDED 

01 

01 

01 

01 

01 

01 

04 

06 

01 

01 

01 

01 

01 

03 

00 

08 

01 

01 

01 

01 

02 

01 

02 

08 

01 

01 

01 

01 

02 

02 

00 

10 

01 

01 

01 

01 

03 

01 

04 

06 

01 

01 

01 

01 

03 

02 

00 

10 

01 

01 

01 

01 

03 

03 

16 

76 

01 

01 

01 

01 

04 

01 

02 

04 

01 

01 

01 

01 

04 

02 

01 

10 

01 

01 

01 

01 

04 

03 

26 

36 

01 

02 

01 

01 

01 

01 

06 

06 

01 

02 

01 

01 

01 

02 

06 

20 

01 

02 

01 

01 

01 

03 

00 

08 

01 

02 

01 

01 

02 

01 

06 

08 

01 

02 

01 

01 

03 

01 

06 

06 

01 

02 

01 

01 

03 

03 

21 

76 

01 

02 

01 

01 

04 

01 

04 

04 

Ol 

02 

01 

01 

04 

03 

19 

36 

01 

03 

01 

01 

01 

01 

06 

06 

Ol 

03 

01 

01 

Ol 

02 

10 

10 

01 

03 

01 

01 

01 

03 

00 

08 

01 

03 

01 

01 

02 

01 

03 

08 

01 

03 

01 

01 

02 

02 

00 

10 

01 

03 

Ol 

01 

03 

01 

06 

06 

01 

03 

01 

01 

03 

03 

1  1 

76 

01 

03 

01 

01 

04 

01 

04 

04 

01 

03 

01 

01 

04 

03 

13 

36 

01 

04 

01 

01 

01 

01 

06 

06 

01 

04 

01 

01 

01 

03 

14 

40 

CM 

04 

01 

01 

02 

01 

06 

08 

01 

04 

01 

01 

02 

03 

00 

16 

01 

04 

01 

01 

03 

01 

06 

06 

01 

04 

01 

01 

03 

03 

03 

64 

01 

04 

01 

01 

04 

01 

02 

04 

01 

04 

01 

01 

04 

03 

12 

40 

01 

05 

01 

01 

01 

01 

04 

06 

01 

05 

01 

01 

01 

03 

1  1 

40 

01 

05 

01 

01 

02 

01 

06 

08 

01 

05 

Ol 

01 

02 

03 

07 

16 

01 

05 

01 

01 

03 

01 

06 

06 

Ol 

05 

01 

01 

03 

03 

04 

64 

01 

05 

01 

01 

04 

01 

04 

04 

01 

05 

01 

01 

04 

03 

08 

40 

01 

06 

01 

01 

01 

01 

06 

06 

01 

06 

01 

01 

01 

03 

08 

40 

01 

06 

0’ 

01 

02 

Ol 

06 

08 

01 

06 

O' 

01 

02 

03 

02 

16 

01 

06 

01 

01 

03 

01 

06 

06 

01 

06 

01 

01. 

03 

03 

02 

64 

01 

06 

01 

oi 

04 

01 

02 

04 

Ol 

06 

01 

Ol 

04 

03 

06 

40 

01 

07 

O' 

01 

01 

01 

04 

06 

01 

07 

01 

01 

01 

03 

09 

40 

Ol 

07 

oi 

01 

02 

01 

04 

08 

Ol 

07 

01 

01 

02 

03 

07 

16 

01 

07 

oi 

01 

03 

01 

06 

06 

01 

07 

oi 

Ol 

03 

03 

04 

64 

Ol 

07 

01 

01 

04 

01 

02 

04 

01 

07 

01 

01 

04 

03 

08 

40 

01 

08 

01 

01 

01 

01 

04 

06 

01 

08 

oi 

01 

01 

03 

OB 

40 

o  • 

08 

01 

01 

02 

01 

04 

08 

C  i 

08 

01 

01 

02 

03 

08 

16 

r'  4 

08 

01 

01 

03 

01 

06 

06 

A  . 

08 

01 

01 

03 

03 

06 

64 

01 

08 

01 

01 

04 

01 

04 

04 

01 

08 

01 

01 

04 

03 

07 

40 

01 

09 

01 

01 

01 

01 

04 

06 

01 

09 

01 

01 

01 

03 

08 

40 

O' 

09 

01 

oi 

02 

01 

04 

08 

Ol 

09 

oi 

01 

02 

03 

03 

16 

01 

09 

01 

01 

03 

Oi 

06 

06 

O’ 

C9 

01 

01 

03 

03 

02 

64 

01 

09 

01 

01 

04 

01 

00 

04 

Ol 

09 

01 

01 

04 

03 

08 

40 

O' 

10 

01 

01 

01 

01 

04 

06 

Ol 

10 

cm 

01 

01 

03 

04 

40 

01 

10 

01 

01 

02 

01 

02 

08 

01 

10 

01 

Oi 

02 

03 

06 

16 

O' 

10 

O' 

01 

03 

01 

06 

06 

01 

10 

01 

01 

03 

03 

03 

64 

Ol 

10 

01 

01 

04 

01 

02 

04 

01 

10 

01 

01 

04 

03 

04 

40 

02 

01 

01 

01 

01 

01 

06 

06 

02 

01 

01 

01 

01 

03 

02 

08 
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02 

01 

01 

02 

01 

01 

02 

01 

01 

02 

01 

01 

02 

01 

01 

02 

01 

01 

02 

01 

01 

02 

01 

01 

02 

02 

01 

02 

02 

01 

02 

02 

01 

02 

02 

01 

02 

02 

01 

02 

02 

01 

02 

02 

01 

02 

02 

01 

02 

03 

01 

02 

03 

01 

02 

03 

01 

02 

03 

01 

02 

03 

01 

02 

03 

01 

02 

03 

01 

02 

03 

01 

02 

03 

01 

02 

04 

01 

02 

04 

01 

02 

04 

01 

02 

04 

01 

02 

04 

01 

02 

04 

01 

02 

04 

01 

02 

04 

01 

02 

05 

01 

02 

05 

01 

02 

06 

01 

02 

05 

01 

02 

05 

01 

02 

05 

01 

02 

05 

01 

02 

05 

01 

02 

06 

01 

02 

06 

01 

02 

06 

01 

02 

06 

01 

02 

06 

01 

02 

06 

01 

02 

06 

01 

02 

06 

01 

02 

07 

01 

02 

07 

01 

02 

07 

01 

02 

07 

01 

02 

07 

01 

02 

07 

01 

02 

07 

01 

02 

07 

01 

02 

08 

01 

02 

08 

01 

02 

08 

01 

02 

08 

01 

02 

08 

01 

02 

08 

01 

02 

08 

01 

02 

08 

01 

02 

09 

01 

02 

09 

01 

02 

09 

01 

02 

09 

01 

02 

09 

01 

02 

09 

01 

02 

09 

01 

02 

09 

01 

02 

10 

01 

02 

10 

01 

02 

10 

01 

02 

10 

01 

02 

10 

01 

02 

10 

01 

02 

10 

01 

02 

10 

01 

03 

01 

01 

03 

01 

01 

03 

01 

01 

03 

01 

01 

03 

01 

oi 

03 

01 

01 

03 

01 

01 

01 

02 

01 

01 

02 

02 

01 

03 

01 

01 

03 

02 

01 

03 

03 

01 

04 

01 

01 

04 

02 

01 

04 

03 

01 

01 

01 

01 

01 

02 

01 

01 

03 

01 

02 

01 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

02 

01 

01 

03 

01 

02 

01 

01 

02 

02 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

03 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

03 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

03 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

OI 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

03 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

03 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

03 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

03 

01 

03 

01 

01 

03 

03 

01 

04 

01 

01 

04 

03 

01 

01 

01 

01 

01 

03 

01 

02 

01 

01 

02 

02 

01 

03 

01 

01 

03 

02 

01 

03 

03 

00 

08 

00 

10 

03 

06 

00 

10 

14 

76 

02 

04 

01 

10 

26 

36 

06 

06 

06 

20 

04 

08 

04 

08 

06 

06 

13 

76 

02 

04 

13 

36 

06 

06 

02 

10 

00 

08 

04 

08 

00 

10 

06 

06 

14 

76 

02 

04 

06 

36 

04 

06 

10 

40 

02 

08 

00 

16 

06 

06 

02 

64 

00 

04 

1  1 

40 

04 

06 

07 

40 

06 

08 

04 

16 

06 

06 

04 

64 

02 

04 

06 

40 

04 

06 

08 

40 

06 

08 

00 

16 

06 

06 

02 

64 

02 

04 

04 

40 

04 

06 

08 

40 

06 

08 

04 

16 

06 

06 

03 

64 

02 

04 

04 

40 

06 

06 

08 

40 

02 

08 

08 

16 

06 

06 

06 

64 

02 

04 

06 

40 

04 

06 

06 

40 

02 

08 

07 

16 

05 

06 

07 

64 

02 

04 

04 

40 

04 

06 

07 

40 

02 

08 

07 

16 

06 

06 

07 

64 

02 

04 

07 

40 

06 

06 

OO 

08 

00 

08 

00 

10 

04 

06 

00 

10 

10 

76 
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04 

02 

04 

02 

04 

02 

04 

02 

04 

02 

04 

02 

04 

03 

04 

03 

04 

03 

04 

03 

04 

03 

04 

03 

04 

03 

04 

03 

04 

03 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

OS 

04 

05 

04 

05 

04 

05 

04 

05 

04 

05 

04 

05 

04 

05 

04 
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09 
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10 

04 

10 

04 

10 

04 

10 

04 

10 

04 

10 

04 

10 

04 

10 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  oi 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  01 

OI  01 

01  01 

01  01 

01  01 

01  01 

01  01 

01  oi 

01  01 

01  01 

01  01 

01  01 

01  01 
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01 
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00 

08 
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06 

07 

76 

04 

04 

24 

36 

04 

06 

01 

10 

00 

08 

06 

08 

02 

10 

06 

06 

12 

76 

04 

04 

22 

36 

04 

06 

12 

40 

08 

08 

03 

16 

06 

06 

04 

64 

04 

04 

08 

40 

04 

06 

14 

40 

06 

08 

00 

16 

06 

06 

02 

64 

04 

04 

09 

40 

06 

06 

12 

40 

05 

08 

03 

16 

06 

06 

03 

64 

02 

04 

04 

40 

06 

06 

12 

40 

06 

08 

05 

16 

06 

06 

03 

64 

02 

04 

08 

40 

04 

06 

1  1 

40 

06 

08 

06 

16 

06 

06 

07 

64 

04 

04 

09 

40 

06 

06 

08 

40 

06 

08 

07 

16 

06 

06 

01 

64 

02 

04 

07 

40 

04 

06 

07 

40 

07 

08 

07 

16 

06 

06 

03 

64 

02 

04 

06 

40 
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SAS3* 1 

NUMBER 

OF  ACFT 

oamageo/base/acft  type 

trial 

DAY 

BASE 

TYPE 

0 

01 

01 

01 

01 

01 

01 

OS 

01 

oi 

01 

01 

06 

01 

01 

01 

02 

02 

01 

01 

01 

03 

01 

01 

01 

02 

03 

03 

01 

01 

Oi 

03 

04 

01 

01 

Oi 

04 

01 

01 

oi 

03 

04 

02 

01 

01 

02 

04 

03 

oi 

01 

Oi 

04 

05 

oi 

Oi 

02 

SAS4-1 

NUM8ER 

OF  CANS 

/BASE/ ACFT  TYPE/PART 

trial 

DAY 

BASE 

Type 

PART  0 

02 

07 

01 

01 

0450  1 

SAS5 •  i 

NUMBER 

NMCS 

HOURS /BASE / ACF T  TYPE 

TRIAL 

0  A  y 

BASE 

TYPE 

HOURS 

O' 

02 

01 

01 

24 

C' 

oe 

01 

01 

24 

01 

09 

O' 

O' 

24 

s/  1 

10 

01 

O' 

24 

c; 

0  1 

oi 

01 

03 

02 

02 

O' 

Oi 

48 

02 

03 

0  1 

O' 

24 

02 

04 

01 

Oi 

24 

r  ' 

05 

01 

01 

48 

o: 

06 

01 

C  1 

24 

07 

01 

Oi 

24 

o: 

08 

Cl 

O' 

24 

c. 

09 

O' 

01 

24 

02 

10 

01 

01 

24 

03 

O' 

O' 

O' 

03 

03 

02 

O' 

O' 

48 

03 

05 

oi 

O' 

48 

C3 

06 

01 

01 

24 

03 

07 

d 

01 

24 

04 

04 

O' 

01 

48 

c- 

08 

O' 

0  1 

24 

04 

09 

01 

01 

48 

SAS6* 1 

NUMBER 

NMCS 

ACFT/BASE/ACFT 

trial 

DAY 

BASE 

TYPE 

0 

01 

01 

01 

01 

01 

01 

04 

01 

01 

01 

01 

05 

01 

01 

02 

01 

07 

01 

01 

01 

01 

08 

01 

01 

01 

02 

01 

01 

01 

02 

02 

02 

01 

01 

01 

02 

04 

01 

01 

01 

02 

07 

01 

01 

01 

03 

01 

01 

01 

02 

03 

02 

01 

oi 

02 

03 

04 

01 

01 

03 

03 

05 

01 

01 

01 

03 

06 

01 

01 

02 

03 

09 

01 

01 

01 

03 

10 

01 

01 

01 

04 

03 

01 

01 

03 

04 

04 

01 

oi 

01 

04 

07 

0i 

01 

01 

04 

08 

01 

01 

02 

04 

10 

01 

oi 

01 

B-7 


S*S7*1  ON-EQP  DELAY  T IME ( MINUTES )/BASE/PERSONN£L  TYPE 


trial 

day 

BASE 

TYPE 

TIME 

# 

01 

01 

01 

001 

1  17 

16 

01 

01 

01 

012 

120 

1 

01 

01 

01 

015 

675 

17 

01 

01 

01 

030 

96 

3 

01 

Oi 

01 

031 

144 

16 

01 

01 

01 

042 

96 

3 

Oi 

01 

01 

043 

1320 

5 

01 

01 

01 

045 

513 

10 

01 

01 

01 

051 

219 

16 

01 

01 

01 

065 

708 

14 

01 

02 

01 

001 

18 

21 

01 

02 

01 

012 

555 

2 

01 

02 

01 

015 

33 

18 

01 

02 

01 

030 

96 

6 

01 

02 

01 

042 

549 

4 

01 

02 

01 

051 

42 

21 

01 

02 

01 

065 

216 

19 

01 

03 

oi 

001 

9 

22 

01 

03 

01 

004 

555 

1 

01 

03 

01 

007 

357 

1 

01 

03 

01 

015 

39 

19 

01 

03 

01 

030 

384 

18 

01 

03 

01 

031 

9 

17 

Cl 

03 

01 

033 

78 

3 

Cl 

03 

01 

045 

42 

12 

01 

03 

01 

C5  1 

39 

24 

01 

03 

01 

053 

1  1  1 

6 

Cl 

03 

01 

062 

558 

1 

01 

03 

01 

065 

129 

23 

01 

04 

01 

001 

1  17 

35 

01 

04 

01 

013 

1  17 

1 

01 

04 

01 

014 

30 

1 

Oi 

04 

01 

015 

147 

24 

01 

04 

01 

030 

96 

22 

01 

04 

01 

031 

33 

22 

01 

04 

01 

04  3 

87 

6 

Oi 

04 

01 

045 

27 

13 

01 

04 

01 

051 

18 

26 

01 

04 

01 

053 

282 

15 

01 

04 

01 

065 

108 

26 

Oi 

05 

01 

001 

72 

44 

01 

05 

01 

013 

384 

3 

01 

05 

01 

015 

297 

30 

01 

05 

01 

030 

72 

24 

Oi 

05 

01 

034 

60 

1 

01 

05 

01 

045 

21 

14 

01 

05 

01 

059 

156 

1 

01 

05 

01 

065 

42 

27 

01 

06 

01 

001 

15 

47 

Oi 

06 

01 

015 

201 

35 

01 

06 

01 

03' 

12 

23 

Oi 

06 

oi 

033 

3 

4 

01 

06 

01 

045 

132 

18 

01 

06 

01 

046 

180 

2 

Oi 

06 

01 

059 

549 

2 

O' 

07 

01 

001 

15 

49 

o- 

07 

01 

015 

90 

38 

oi 

07 

01 

031 

15 

26 

Oi 

07 

01 

04  1 

645 

1 

01 

07 

01 

044 

2'6 

2 

O' 

07 

01 

045 

42 

19 

Oi 

08 

01 

001 

9 

52 

01 

08 

01 

007 

72 

2 

oi 

08 

01 

015 

45 

4  1 

01 

08 

01 

031 

15 

27 

Oi 

08 

oi 

045 

75 

21 

01 

09 

01 

015 

114 

44 

01 

09 

01 

031 

45 

33 

01 

09 

01 

04  5 

42 

23 

O' 

09 

01 

046 

102 

3 

01 

09 

01 

066 

201 

2 

01 

10 

01 

031 

9 

34 

01 

10 

01 

045 

12 

24 

01 

10 

oi 

046 

177 

4 

02 

oi 

01 

001 

13209 

62 

02 

01 

01 

0'5 

576 

57 

02 

oi 

oi 

030 

96 

27 

02 

01 

01 

031 

13266 

48 

02 

01 

01 

045 

534 

34 

02 

01 

01 

051 

13248 

37 

02 

01 

01 

065 

633 

38 

02 

01 

01 

066 

1  1  4 

3 

02 

02 

01 

001 

18 

65 

02 

02 

01 

00  7 

1  17 

3 

02 

02 

oi 

015 

1  1  1 

59 

B-8 
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SAS8*  1  OFF-EQP  OELAY  TIME  (MINUTES )/BASE/PERSONN£L  TYPE 


trial 

DAY 

BASE 

TYPE 

TIME 

0 

01 

04 

01 

012 

12 

1 

01 

OS 

01 

013 

186 

1 

02 

03 

01 

013 

42 

2 

02 

05 

01 

012 

2S2 

2 

02 

06 

01 

009 

147 

1 

03 

OS 

01 

009 

42 

2 

03 

06 

01 

017 

240 

1 

04 

04 

01 

003 

108 

1 

04 

04 

01 

017 

60 

2 

04 

07 

01 

013 

66 

3 

SAS9-1 

ON-EOP 

DELAY 

TIMC ( MI 

NUTES  l/BASE/AGE  TYPE 

trial 

DAY 

BASE 

TYPE 

TIME 

0 

01 

01 

01 

06 

09 

01 

01 

02 

01 

06 

09 

02 

01 

08 

01 

06 

09 

03 

02 

01 

01 

06 

27 

06 

03 

07 

01 

06 

09 

07 

04 

01 

01 

06 

27 

10 

SA$ 10* 

1  OFF-EQP  DELAY  T I ME ( MI NUT E S ) /BASE /AGE  TYPE 

TRIAL 

DAY 

BASE 

TYPE 

TIME 

0 

SAS 1 1*1 

DELAY 

T IME( MINUTES )/BASE/PART 

NUMBER 

trial 

day 

BASE 

PART 

TIME 

0 

01 

02 

01 

0302 

609 

1 

01 

04 

01 

0380 

27 

1 

01 

05 

01 

037  1 

552 

1 

Oi 

05 

01 

0377 

1065 

1 

01 

08 

01 

0255 

720 

1 

02 

01 

01 

021  1 

3345 

1 

02 

01 

01 

0606 

2820 

1 

02 

02 

01 

0249 

639 

1 

02 

02 

OI 

0305 

705 

1 

02 

05 

01 

0299 

1512 

1 

03 

01 

Cl 

0128 

12387 

1 

03 

02 

01 

0057 

621 

1 

03 

02 

01 

0219 

462 

1 

03 

02 

01 

0250 

807 

1 

03 

02 

01 

0251 

564 

1 

03 

05 

01 

0201 

576 

1 

03 

05 

01 

0228 

759 

1 

03 

05 

01 

0230 

753 

1 

03 

05 

01 

0580 

123 

1 

03 

06 

01 

0232 

621 

1 

03 

06 

01 

0299 

1215 

2 

03 

07 

01 

0230 

152  1 

2 

03 

09 

01 

0255 

813 

2 

03 

10 

Oi 

0301 

627 

1 

04 

03 

01 

0217 

666 

1 

04 

03 

01 

0616 

144 

1 

04 

04 

01 

0232 

795 

2 

04 

04 

01 

0254 

915 

1 

04 

04 

01 

0444 

615 

1 

04 

08 

01 

0268 

642 

1 

04 

09 

01 

0297 

804 

1 

04 

09 

01 

0388 

756 

1 

04 

10 

01 

0401 

71  1 

1 

B-12 


FILENAME  IN81  '[G0RNT0C.SAS3F4GTAPE81.DAT’; 

DATA  TAPE81; 

INFILE  IN81; 

INPUT  TNUM  $  4-5  DAY  $  10-11  BASENUM  $  17  ACTYPE  $  23  MISSTYP  $  29 
MISSPRI  $  35  SORTFLN  40-41  SORTDEM  46-47; 

RUN; 

★ _ _ — - - - — - — - - 

PROCS  TO  PRINT  AND  PERFORM  MEANS  BY: 

1)  TRIAL 

2)  DAY 

3)  TRIAL  &  DAY 


PROC  SORT;  BY  TNUM; 

PROC  PRINT;  BY  TNUM; 

PROC  MEANS;  BY  TNUM; 

PROC  SORT;  BY  DAY; 

PROC  PRINT;  BY  DAY; 

PROC  MEANS;  BY  DAY; 

PROC  SORT;  BY  TNUM  DAY; 

PROC  PRINT;  BY  TNUM  DAY; 
PROC  MEANS;  BY  TNUM  DAY; 


PROC  TO  PERFORM  ANOVA  TABLE  AND  FIND  SIGNIFICANT  DIFFERENCES  BY 
DAY  AND  TRIAL  NUMBER  WITH  FULL  INTERACTIONS 


ANOVA;  CLASSES  TNUM  DAY; 

MODEL  SORTFLN  =  TNUM  DAY  TNUM  *  DAY; 
MEANS  TNUM  |  DAY/BON; 


- COMMENT  OUT - 

MEANS  TNUM  DAY/DUNCAN; 

MEANS  TNUM  DAY/SCHEFFE; 

MEANS  TNUM  DAY/SNK; 

MEANS  TNUM  DAY/TUKEY; 


PROCS  TO  PRINT  TABULATIONS  BY  TRIAL,  BASE,  AND  DAY 


TABULATE; 

CLASS  TNUM  BASENUM  DAY; 

VAR  SORTFLN  SORTDEM; 

TABLE  TNUM*DAY* (SUM  MEAN  STD),  BASENUM* (SORTFLN  SORTDEM); 


PROC  TO  PERFORM  PLOT  PROCEDURE/  WITH  SORTIES  FLOWN  BY  DAY 

The  PLOT  statement  is  in  the  form: 

PLOT  verticaL  *  horizontal  *  'character' 


/OVERLAY  combines  plots  on  one  page 


PROC  PLOT; 


PLOT  SORTFLN  *  DAY  -  '*'; 

PLOT  SORTDEM  *  DAY  -  '(?' /OVERLAY ; 


PROC  TO  PRODUCE  BAR  CHART  OF  SORTIES  FLOWN  BY 
BASE  AND  TRIAL 


C-l 


SfcS  12:20  WEDNESDAY ,  MARCH  25.  1987 

-  -  -  . . - . TNUM=01 - - - - - - - 

OBS  DA  i  BASfcNuM  AC1YPE  M1SSHP  MibiHRl  SORTFLN  SQRIDEM 


U>®®OU>CK0"»O®®O®®U>®,»®«>O®®O®l0W«>®O®®®  WOl0OCOlBWV'*O<£O<8WT’*  0®0 
—  -r-  —o  <m  r»  o  *-  - 


•»0c<0<r0®<N— ®®®0®u>»*'r<J>®00<'’>Ou>— ®®®®<Ni£>n<N®n<n 
—  o«  <n  —  «-  —  ~  —  — 


■<—rMn— nn»-(Nn— otn— <n— r)>-n— d*-o— o— o— d— n— n— o— n-n— rr-n--n 


--nnnnntvv- — — nofW*---nn<w<f»'—  n«on>»<r- -wMinni-  -Mnnnt  *-- 


-  —  nonnnnnnnnnn^i^  *r  "»in  if)  inmtn  m  if>  ^  SP  yP  <HP  SP  ^  'P'A'P  ££ 

ooooooooooooooooooooooooooooooooooooooooooooooocooooo 


-  <Nrn»</Hor~®a>Q— D<*>,Tif"£'~®<7>0*'cjo,nr®r'®(7)0— <MH*inl£r~«aiO’-<Nrwu'iur^®<7>0-o«r' 

^  (N  <m  fN  <n  <n  <n  ?n  c«n  <n  o  r»  n  n  n  n  n  n  n  n  *rn  *t  t  *» -r  n  *t  *r  in  ®  ui  ji 


FILENAME  IN82  ' [G0RNT0C.SAS3F4GTAPE82.DAT'; 

DATA  TAPE82; 

INFILE  IN82; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  ACTYPE  $  27  ACLOSS  33-34; 
RUN; 

* _ * 

THIS  SECTION  WILL  COMPUTE  AVERAGE  ACFT  LOST 
BY  TRIAL  NUMBER  AND  BY  DAY 


PROC  SORT;  BY  TNUM; 

PROC  MEANS;  BY  TNUM; 
PROC  SORT;  BY  DAY; 

PROC  MEANS;  BY  DAY; 


THIS  SECTION  WILL  PRODUCE  ANOVA  TABLE  AND  FIND 
SIGNIFICANT  DIFFERENCES  BY  TRIAL  NUMBER  AND  DAY 


PROC  ANOVA;  CLASSES  TNUM  DAY  ; 

MODEL  ACLOSS  *  TNUM  DAY  TNUM  *  DAY; 

MEANS  TNUM  |  DAY  /SNK; 

* _ _ _ - _ — - —  * 

!  THIS  SECTION  WILL  PRODUCE  A  BAR  CHART  OF  ACFT  LOST 
!  BY  BASENUM  GROUPED  BY  TRIAL  NUMBER 


PROC  CHART; 

VBAR  BASENUM/SUMVAR-ACLOSS  GROUP-TNUM; 

If - - - - - _  - - - - - - >'c 

THIS  SECTION  WILL  PRODUCE  TABLE  OF  ACFT  LOST  BY 
TRIAL  NUMBER  AND  DAY.  THE  TABLE  WILL  CONTAIN 
SUM.  MEAN,  AND  STD  DEVIATION  STATISTICS 


PROC  TABULATE; 

CLASS  TNUM  DAY  BASENUM; 

VAR  ACLOSS; 

TABLE  TNUM’'  ( SUM  MEAN  STD),  BASENUM*ACLOSS ; 
TABLE  DAY*(SUM  MEAN  STD),  BASENUM*ACLOSS ; 


FILENAME  IN83  *  [GORNTOC . SAS] F4GTAPE83.DAT* ; 

DATA  TAPE83; 

INFILE  IN83; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  ACTYPE  $  27  AC DAM  33~3A; 

run; 


THIS  SECTION  WILL  COMPUTE  AVERAGE  AC FT  DAMAGED 
BY  TRIAL  NUMBER  AND  BY  DAY 


PROC  SORT;  BY  TNUM; 

PROC  MEANS;  BY  TNUM; 
PROC  SORT;  BY  DAY; 

PROC  MEANS;  BY  DAY; 


THIS  SECTION  WILL  PRODUCE  ANOVA  TABLE  AND  FIND 
SIGNIFICANT  DIFFERENCES  BY  TRIAL  NUMBER  AND  DAY 


PROC  ANOVA;  CLASSES  TNUM  DAY  ; 

MODEL  AC DAM  -  TNUM  DAY  TNUM  *  DAY; 
MEANS  TNUM  I  DAY  /SNK; 


THIS  SECTION  WILL  PRODUCE  A  BAR  CHART  OF  AC FT  DAMAGED 
BY  BASENUM  GROUPED  BY  TRIAL  NUMBER 


PROC  CHART; 

VBAR  BASENUM/SUMVAR-ACDAM  GROUP-TNUM; 


THIS  SECTION  WILL  PRODUCE  TABLE  OF  ACFT  DAMAGED  BY 
TRIAL  NUMBER  AND  DAY.  THE  TABLE  WILL  CONTAIN 
SUM,  MEAN,  AND  STD  DEVIATION  STATISTICS 


PROC  TABULATE; 

CLASS  TNUM  DAY  BASENUM; 

VAR  acdam; 

TABLE  TNUM* (SUM  MEAN  STD),  BASENUM*ACDAM ; 
TABLE  DAY* (SUM  MEAN  STD),  BASENUM*ACDAM ; 


F I  l.KNAME  IN84  '  [G0RNT0C.SASjF4Gtape84.DAT'; 

DATA  TAPE84; 

INFILE  IN84; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  ACTYPE  $  27  PART  $  32*34 
CANNAMT  40-41; 

RUN; 

* _ * 

PROC  TO  AVERAGE  NUMBER  OF  CANN'S  BY  TRIAL  NUMBER 
AND  BY  PART 


PROC  SORT;  BY  TNUM  PART; 

PROC  MEANS;  BY  TNUM  PART; 

A _ * 

PROC  TO  TOTAL  NUMBER  OF  CANN'S  BY  TRIAL  NUMBER  j 
AND  BY  DAY 


PROC  TABULATE; 

TITLE  ’NUMBER  OF  CANNS  BY  TRIAL  NUM  /  DAY'; 
CLASS  DAY  TNUM; 

VAR  CANNAMT; 

LABEL  TNUM  «  'TRIAL  NUM' ; 

KEYLABEL  SUM  =  ’TOTAL’ 

STD  =  ’STD  DEV’ ; 

table  tnum  *  day  ,  cannamt  *  (sum  mean); 


PROC  TO  TOTAL  NUMBER  OF  CANN’S  BY  TRIAL  NUMBER 
AND  BY  PART 


PROC  TABULATE; 

TITLE  ’NUMBER  OF  CANNS  BY  TRIAL  NUM  /  PART  NUM’; 
CLASS  TNUM  PART; 
var  cannamt: 

LABEL  TNUM  -  ’TRIAL  NUM’  *, 

KEYLABEL  SUM  -  ’TOTAL’ 

STD  -  ’STD  DEV’ ; 

TABLE  TNUM  *  PART  .  CANNAMT  *  (SUM  MEAN); 


raMMniia  ■■■■■■■  ibui ■■  uuijim  UP  ■*  V  *VW  V*  M  R*  "V *  V  YJHf»V*viry  fvr  W^WfV  vy  ww  »VWyif| 


DATA  TAPE85; 

INFILE  IN85; 

INPUT  TNUM  S  5-6  ACTYPE  $  12*13  BASENUM  S  20  DAY  $  27  NMCSHR  32-34; 
RUN; 

* _ * 

PROCS  TO  FIND  AVERAGE  NMCS  HOURS  BY  TRIAL 
AND  DAY 


PROC  SORT;  BY  TNUM; 

PROC  MEANS ;  BY  TNUM; 

PROC  SORT;  BY  DAY; 

PROC  MEANS;  BY  DAY; 

* _ * 

PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 
TRIAL  AND  DAY  WITH  FULL  INTERACTIONS 


PROC  ANOVA;  CLASSES  TNUM  DAY  ; 

MODEL  NMCSHR  -  TNUM  DAY  TNUM*DAY ; 
MEANS  TNUM  DAY  TNUM | DAY/SNK; 


1 

: 

f 
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VA^yA.  . 


> /J 


I  .■»  •. 


FILENAME  IN86  ' [GORNTOC . SAS]  F4Gtape86.DAT' ; 

DATA  TAPE86 ; 

INFILE  IN86; 

INPUT  TNUM  $  5-6  ACTYPE  $  12-13  BASENUM  $  20  DAY  $  27 
NMCSAC  33-34; 

RUN; 


PROC  SORT;  BY  TNUM; 

PROC  MEANS;  BY  TNUM; 

PROC  SORT;  BY  DAY; 

PROC  MEANS;  BY  DAY; 

PROC  SORT;  BY  BASENUM; 

PROC  MEANS;  BY  BASENUM; 

A - * 

I  PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 
TRAIL,  DAY,  AND  BASE  NUMBER  WITH  FULL 
INTERACTIONS 

« - -  . 

> 

PROC  ANOVA;  CLASSES  TNUM  DAY  BASENUM; 

MODEL  NMCSAC  *  TNUM  DAY  BASENUM  TNUM*DAY*BASENUM; 
MEANS  TNUM  DAY  BASENUM  TNUM | DAY | BASENUM/SNK; 


PROCS  TO  FIND  AVERAGE  NMCS  ACFT  BY  TRIAL, 
DAY,  AND  BASE  NUMBER 


C-10 


FILENAME  IN87  ' [GORNTOC.SAS] F4Gt«p*87.DAT' ; 

DATA  TAPE87; 

INFILE  IN87; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  PERSON  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 


PROCS  TO  FIND  AVERAGE  NUMBER  OF  DELAYS  BY 

1)  TNUM/PERSONNEL  TYPE 

2)  DAY/PERSONNEL  TYPE 


|  PROC  SORT;  BY  TNUM  PERSON; 

•  PROC  MEANS;  BY  TNUM  PERSON; 

!  PROC  SORT;  BY  DAY  PERSON; 

PROC  MEANS;  BY  DAY  PERSON; 


PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 

1)  TRIAL 

2)  DAY 

3)  PERSONNEL  TYPE 

4)  COMBINATIONS  OF  THE  ABOVE 


PROC  ANOVA;  CLASSES  TNUM  DAY  PERSON; 

MODEL  DELNUM  -  TNUM  DAY  PERSON  TNUM*DAY*PERSON ; 
MEANS  TNUM  DAY  PERSON  TNUM | DAY |PERSON/SNK; 


C-ll 


FILENAME  IN88  ’[G0RNT0C.SAS3F4GTAPE88.DAT'; 

DATA  TAPE88; 

INFILE  IN88; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  PERSON  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 


PROCS  TO  FIND  AVERAGE  NUMBER  OF  DELAYS  BY 

1)  TNUM/ PERSONNEL  TYPE 

2)  DAY/PERSONNEL  TYPE 


PROC  SORT;  BY  TNUM  PERSON; 

PROC  MEANS;  BY  TNUM  PERSON; 
PROC  SORT;  BY  DAY  PERSON; 

PROC  MEANS;  BY  DAY  PERSON; 


PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 

1)  TRIAL 

2)  DAY 

3)  PERSONEL  TYPE 

4)  COMBINATIONS  OF  THE  ABOVE 


FILENAME  IN89  ’[GORNTOC.SAS3F4GTAPE89.DAT1; 

DATA  TAPE89; 

INFILE  IN89; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  AGE  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 

it _ _ _ _ _ * 

PROCS  TO  FIND  AVERAGE  NUMBER  OF  DELAYS  BY 

1)  TNUM/AGE  TYPE 

2)  DAY/AGE  TYPE 


PROC  SORT;  BY  TNUM  AGE; 

PROC  MEANS;  BY  TNUM  AGE; 

PROC  SORT;  BY  DAY  AGE; 

PROC  MEANS;  BY  DAY  AGE; 

* _ it 

PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 

1)  TRIAL 

2)  DAY 

3)  AGE  TYPE 

4)  COMBINATIONS  OF  THE  ABOVE 


PROC  ANOVA;  CLASSES  TNUM  DAY  AGE; 

MODEL  DELNUM  =  TNUM  DAY  AGE  TNUMy,DAY,rAGE ; 
MEANS  TNUM  DAY  AGE  TNUM | DAY | AGE/SNK ; 


C-13 


.*  /  /  /  ** 


FILENAME  IN90  '[G0RNT0C.SAS3F4GTAPE90.DAT'; 

DATA  TAPE90; 

INFILE  IN90; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  AGE  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 


PROCS  TO  FIND  AVERAGE  NUMBER  OF  DELAYS  BY 

1)  TNUM/AGE  TYPE 

2)  DAY/AGE  TYPE 

_ _ _ _ 


PROC  SORT;  BY  TNUM  AGE; 

PROC  MEANS;  BY  TNUM  AGE; 

PROC  SORT;  BY  DAY  AGE; 

PROC  MEANS;  BY  DAY  AGE; 

:'t - * 

I  PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 
I  1)  TRIAL 

I  2)  DAY 

3)  AGE  TYPE 

4)  COMBINATIONS  OF  THE  ABOVE 


PROC  ANOVA;  CLASSES  TNUM  DAY  AGE; 

MODEL  DELNUM  =  TNUM  DAY  AGE  TNUM’’'DAY*AGE ; 
MEANS  TNUM  DAY  AGE  TNUM | DAY | AGE/SNK; 


FILENAME  IN91  '[G0RNT0C.SAS3F4GTAPE91.DAT'; 

DATA  TAPE91; 

INFILE  IN91; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  PART  $  25-27 
TIME  30-34  DELNUM  40-41: 


PROCS  TO  FIND  AVERAGE  NUMBER  OF  DELAYS  BY 

1)  TNUM/PART 

2)  DAY/PART 


PROC  SORT;  BY  TNUM  PART; 

PROC  MEANS;  BY  TNUM  PART 
PROC  SORT;  BY  DAY  PART; 

PROC  MEANS;  BY  DAY  PART; 


PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 

1)  TRIAL 

2)  DAY 

3)  PART  NUMBER 

4)  COMBINATIONS  OF  THE  ABOVE 


PROC  ANOVA;  CLASSES  TNUM  DAY  PART; 

MODEL  DELNUM  -  TNUM  DAY  PART  TNUM''DAY’'PART ; 
MEANS  TNUM  DAY  PART  TNUM | DAY | PART/SNK; 


FILENAME  1N92  ’[G0RNT0C.SAS3f4GTAPE92.DAT'; 

DATA  TAPE92; 

INFILE  IN92; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  SHOP  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 

* _ * 

PROCS  TO  FIND  AVERAGE  NUMBER  OF  DELAYS  BY 

1)  TNUM/SHOP  NUMBER 

2)  DAY/SHOP  NUMBER 


PROC  SORT;  BY  TNUM  SHOP; 

PROC  MEANS;  BY  TNUM  SHOP; 
PROC  SORT;  BY  DAY  SHOP; 

PROC  MEANS;  BY  DAY  SHOP; 


1 k _ —  _ _ — _ — - - - * 

PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 

1)  TRIAL 

2)  DAY 

3)  SHOP  NUMBER 

4)  COMBINATIONS  OF  THE  ABOVE 


PROC  ANOVA;  CLASSES  TNUM  DAY  SHOP; 

MODEL  DELNUM  -  TNUM  DAY  SHOP  TNUM*DAY*SHOP; 
MEANS  TNUM  DAY  SHOP  TNUM | DAY | SHOP/SNK ; 


FILENAME  IN93  '[G0RNT0C.SAS1F4GTAPE93.DAT'; 

DATA  TAPE93; 

INFILE  IN93; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  S  20  SHOP  $  25-27 
TINE  30-34  DELNUM  40-41; 

RUN; 


PROCS  TO  FIND  AVERAGE  NUMBER  OF  DELAYS  BY 

1)  TNUM/ SHOP  NUMBER 

>V  _  _ _ _ _ _ _ _ _ u  . 


PROC  SORT;  BY  TNUM  SHOP; 

PROC  MEANS;  BY  TNUM  SHOP; 


PROCS  TO  FIND  SIGNIFICANT  DIFFERENCES  BY 

1)  TRIAL 

2)  DAY 

3)  SHOP  NUMBER 

4)  COMBINATIONS  OF  THE  ABOVE 


PROC  ANOVA;  CLASSES  TNUM  DAY  SHOP; 

MODEL  DELNUM  -  TNUM  DAY  SHOP  TNUN*DAY  'SHOP ; 
MEANS  TNUM  DAY  SHOP  TNUM | DAY | SHOP/SNK ; 


C- 17 


filename  insi  ' Cgorntoc.sas1f4gtape8i.dat'; 

DATA  TAPE81; 

INFILE  IN81; 

INPUT  (TNUM  DAY  BASENUM  ACTYPE  MISSTYP  MISSPRI  SORTFLN  SORTDEM  ) 
(5. ,6. ,6. ,6. ,6. .6. ,6. ,6.); 

RUN; 

ft _ _ _ _ _ _ _  _ _ _ _ _ _ _ _ _ _ _ _ _ _ it 

I  THIS  SECTION  WILL  PRODUCE  PIE  CHARTS.  | 

!  THE  SLICES  WILL  CORRESPOND  TO  DAY.  ! 

:  WITH  EACH  NEW  PIE  CORRESPONDING  TO 

THE  TRIAL  NUMBER 


PROC  SORT;  8Y  TNUM  DAY; 

PATTERN  V-M5; 

GOPT IONS  NOTEXT82; 

TITLE1  F-XSwrSS  'TSAR  SORTIES  FLOWN  BY  DAY/TRIAL'; 
FOOTNOTE  1  F-ITAL1C  'AIRCRAFT  <--»  F-4G’; 

PROC  GCHaRT ; 

BY  TNUM; 

PIE  DAY/SUMVaR  -  SORTFLN 
DISCRETE 

PCT  *  OUTSIDE; 

FLA ; 


THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  SORTIES  FLOWN  BY  DAY  OVERLAYED 
WITH  SORTIES  DEMANDED  BY  DAY. 

A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  NUMBER 


PROC  SORT;  BY  TNUM  MISSTYP  MISSPRI  DAY  I 
PATTERN  V-M5; 

GOPT IONS  NOTEXT82; 

TITLEI  F-XSWISS  TSAR  SORTIES  F LOWN/ DEMANDED ' ; 

TITLE2  F-TRIPLEX  BY  TR  I  AL/.M  I SS  I  ON  TYPE/MISSION  PRIORITY’; 
FOOT  NO  I  E  i  f-italic;  aircraft  <  *  F  4G'; 

SYMBOL  1  W* 1  I  -  JO  1 N  V-STAR; 
jYMB0L2  W*  1  I  JOIN  V-*-; 

PROC  CP LOT  ; 

BY  TNUM  MISSTYP  MISSPRI  ; 

PLOT  SORTFLN  DAY  -1 

SORTDEM  *  DAY  -2  /OVERLAY; 


TSAR  SORTES  FLOWN  BY  DAY/TFUAL 

TNUn.l 

SUM  OF  SORTFLN  BY  DAY 


3 

53  l 

10. 45X  6 


44  o  9  66X 

8  68X 

10  26X 


A/rtCAil/T  < — >  F-4G 


FILENAME  IN82  ’[GORNTOC.SASlF4GTAPE82.DAT'; 

DATA  TAPE82; 

INFILE  IN82; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  ACTYPE  $  27  ACLOSS  33-34; 


THIS  SECTION  HILL  PRODUCE  PIE  CHARTS, 
THE  SLICES  WILL  CORRESPOND  TO  DAY, 
WITH  EACH  NEW  PIE  CORRESPONDING  TO 
THE  TRIAL  NUMBER 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  ' AC FT  LOST  BY  DAY/TR IAL ' ; 
FOOTNOTE 1  F-NONE  'AIRCRAFT  <— >  F-4G' ; 
PROC  GCHART; 

BY  TNUM; 

PIE  DAY/SUMVAR  -  ACLOSS 
PCT  -  OUTSIDE; 


THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  AIRCRAFT  LOST  BY  DAY 
A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  NUMBER 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  ’ACFT  LOST  BY  DAY': 
FOOTNOTE1  F-NONE  AIRCRAFT  <  — >  F*4G 
SYMBOL1  W- 1  I- JOIN  V-STAR; 

PROC  GPLOT ; 

BY  TNUM; 

PLOT  ACLOSS  "  DAY  -1: 


FILENAME  IN83  ’ {GORNTOC. SASj F4GTAPE83.DAT ' ; 

DATA  TAPE83; 

INFILE  IN83; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  ACTYPE  $  27  ACDAM  33-34; 
RUN; 


THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 
THE  SLICES  WILL  CORRESPOND  TO  DAY, 
WITH  EACH  NEW  PIE  CORRESPONDING  TO 
THE  TRIAL  NUMBER 


PATTERN  V-K5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  ' ACFT  DAMAGED  BY  DAY/TRIAL ' ; 
FOOTNOTE  1  F-NONE  'AIRCRAFT  <  —  >  F-4G’; 

PROC  GCHART ; 

BY  TNUM* 

PIE  DAY/SUNVAR  -  ACDAM 

PCT  -  OUTSIDE; 

RUN; 


THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  AIRCRAFT  DAMAGED  BY  DAY 
A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  NUMBER 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'ACFT  DAMAGED  BY  DAY’; 
FOOTNOTE  1  F-NONE  'AIRCRAFT  <  —  >  F~4G' ; 
SYMBOL 1  W-l  I- JOIN  V-STAR; 

PROC  GPLOT; 

BY  TNUM; 

PLOT  ACDAM  *  DAY  -1; 

RUN; 


D-4 


FILENAME  IN84  ' [GORNTOC . SAS) F4Gtape84 . DAT' ; 

DATA  TAPE84; 

INFILE  IN84; 

INPUT  TNUM  5  5-6  DAY  S  12-13  BASENUM  $  20  ACTYPE  $  27  PART  $  32-34 
CANNAMT  40-41; 

RUN; 


THIS  SECTION  WILL  PRODUCE  BAR  CHARTS, 
EACH  BAR  WILL  REPRESENT  TOTAL  NUMBER  OF 
CANN'S  BY  DAY 

NEW  GRAPH  PRODUCED  FOR  EACH  TRIAL 


PATTERN  V-N2; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  CANNS  BY  DAY'; 
TITLE2  F- TRIPLEX  ’BY  TRIAL'; 

FOOTNOTE  ’AIRCRAFT  TYPE  <  — >  F4G  ’  ; 

PROC  GCHART; 

BY  TNUM; 

VBAR  DAY  /  TYPE  -  MEAN 

FRAME 

SUMVAR  -  CANNAMT; 

RUN; 


* _ _ _ _ _ _ _ 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS. 

THE  SLICES  WILL  CORRESPOND  TO  PART  NUMBER 
WITH  EACH  NEW  PIE  CORRESPONDING  TO 
THE  TRIAL  NUMBER 


PATTERN  V-M5 ; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  ’NUMBER  OF  CANNS  BY  PART/TRIAL'; 
FOOTNOTE1  F-NONE  'AIRCRAFT  <  »  F-4C; 

PROC  GCHART; 

BY  TNUM; 

PIE  PART/SUMVAR  -  CANNAMT 

PCT  -  OUTSIDE; 

R  UN ; 


FILENAME  IN85  '[GORNTOC.SASlF4GTAPE85.DAT'; 

DATA  TAPE85; 

INFILE  IN85; 

INPUT  TNUM  $  5-6  DAY  $  12-13  ACTYPE  5  20  BASENUM  $  27  NMCSHR  32-34; 
RUN; 

* _ * 

THIS  SECTION  WILL  PRODUCE  BAR  CHARTS, 

EACH  BAR  WILL  REPRESENT  TOTAL  NUMBER  OF 
NMCS  HOURS  BY  DAY 
NEW  GRAPH  PRODUCED  FOR  EACH  TRIAL 


PATTERN  V-M2; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  NMCS  HOURS  BY  DAY'; 
TITLE2  F-TRIPLEX  'BY  TRIAL'; 

FOOTNOTE  'AIRCRAFT  TYPE  <—  >  F4G'  ; 

PROC  GCHART; 

VBAR  DAY  /  TYPE  -  MEAN 
DISCRETE 
GROUP  -  TNUM 
FRAME 

SUMVAR  -  NMCSHR; 

RUN; 


THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 
THE  SLICES  WILL  CORRESPOND  TO  DAY 
WITH  EACH  NEW  PIE  CORRESPONDING  TO 
THE  TRIAL  NUMBER 


PATTERN  V-M5 ; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  NMCS  HOURS  BY  DAY/TRIAL'; 
FOOTNOTE1  F-NONE  'AIRCRAFT  <-->  F-4G’; 

PROC  GCHART; 

BY  TNUM: 

PIE  DAY/SUMVAR  -  NMCSHR 
DISCRETE 

PCT  -  OUTSIDE; 

RUN; 


D-6 


OF  NMCS  HOURS  BY  DAY 


BY  TRIAL 


NHCSHR  MEAN 
50 


0000000001  0000000001  0000000001  0000000001  DAV 
1234567890  1234567890  1234567890  1234567890 


TNur 


AIRCRAFT  TYPE  <-->  F4C 


\£ 


FILENAME  IN86  '  [GORNTOC.SAS] F4Gtape86.DAT' ; 

DATA  TAPE86; 

INFILE  IN86; 

INPUT  TNUM  $  5-6  DAY  12-13  ACTYPE  5  20  BASENUM  $  27 
NMCSAC  33-34; 

RUN; 

* _ * 

THIS  SECTION  WILL  PRODUCE  BAR  CHARTS, 

EACH  BAR  WILL  REPRESENT  TOTAL  NUMBER  OF 
NMCS  ACFT  BY  DAY 

NEW  GRAPH  PRODUCED  FOR  EACH  TRIAL 


PROC  SORT;  BY  TNUM  DAY; 

PATTERN  V-M2; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  NMCS  ACFT  BY  DAY'; 
TITLE2  F-TRIPLEX  'BY  TRIAL'; 

FOOTNOTE  'AIRCRAFT  TYPE  <— »  F4G '  ; 

PROC  GCHART ; 

VBAR  DAY  /  TYPE  -  MEAN 

FRAME 
DISCRETE 

SUMVAR  -  NMCSAC 

GROUP  -  TNUM; 

RUN; 


* _ * 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 

THE  SLICES  WILL  CORRESPOND  TO  DAY 
WITH  EACH  NEW  PIE  CORRESPONDING  TO 
THE  TRIAL  NUMBER 


PATTERN  V»M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  NMCS  ACFT  BY  DAY/TRIAL' ; 
FOOTNOTE  1  F-NONE  'AIRCRAFT  <-->  F-4G' ; 

PROC  GCHART; 

BY  TNUM; 

PIE  DAY/SUMVAR  -  NMCSAC 
DISCRETE 
PCI 


OUTSIDE; 


FILENAME  IN87  '[GORNTOC.SAS3F4Gtape87.DAT'; 

DATA  TAPE87; 

INFILE  IN87; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  S  20  PERSON  5  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 

* 

:  r 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  ’ON-EQUIP  DELAY  TIME  BY  DAY/TR IAL ' ; 
TITLE2  F-TRIPLEX  'TIME  IS  IN  MINUTES': 

FOOTNOTE1  F-NONE  'AIRCRAFT  <—  >  F-4G'  ; 

SYMBOL1  W-l  1“ JOIN  V-STAR; 

PROC  SORT;  BY  TNUM  DAY  PERSON; 

PROC  gplot; 

BY  TNUM  DAY; 

PLOT  TIME  *  PERSON  -1; 

RUN; 

ft _ _ _ _ _ _  _  _  _  _ _ Vc 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 

THE  SLICES  WILL  CORRESPOND  TO  PERSONNEL  TYPE 
WITH  EACH  NEW  PIE  CORRESPONDING  TO  THE  DAY 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F=XSWISS  'NUMBER  OF  DELAY  BY  PERSONNEL  TYPE’; 
TITLE2  F-TRIPLEX  'ON-EQUIPMENT'; 

FOOTNOTE1  F-NONE  'AIRCRAFT  <  —  >  F-4G'; 

PROC  gchart; 

BY  TNUM; 

PIE  PERSON/SUMVAR  -  DELNUM 
PCT  -  OUTSIDE; 


THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  DELAY  TIME  BY  PERSON 

A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  AND  DAY 


i 

i 

FILENAME  IN88  '[GORNTOC.SASjF4GTAPE88.DAT';  ' 

DATA  TAPE88;  j 

INFILE  IN88; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  PERSON  $  25~27 
TIME  30-34  DELNUM  40-41; 

RUN; 

* _ * 

THIS  SECTION  WILL  PRODUCE  X~Y  PLOTS 
OF  DELAY  TIME  BY  PERSONNEL  TYPE 

A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  AND  DAY 

11 _ _ _ _ _ _ _ — - — - - - *  • 

* 


PROC  SORT;  BY  TNUM  DAY  PERSON; 

PATTERN  V-M5; 

GOP T IONS  NOTEXT82; 

TITLE1  F-XSWISS  'OFF-EQUIP  DELAY  TIME  BY  DAY/TRIAL' ; 
TITLE2  F-TRIPLEX  'TIME  IS  IN  MINUTES'; 

FOOTNOTE1  F-NONE  'AIRCRAFT  < — >  F-4G1; 

SYMBOLl  W= 1  1= JOIN  V-STAR; 

PROC  GPLOT ; 

BY  TNUM  DAY; 

PLOT  TIME  *  PERSON  -1; 

RUN; 

it _ _ _ _ _ _ —  — _ _  _  _  _  —  V: 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 

THE  SLICES  WILL  CORRESPOND  TO  PERSONNEL  TYPE 
WITH  EACH  NEW  PIE  CORRESPONDING  TO  THE  DAY 

?r_ _ _ _ — - - . - . - . - . - - • 


PATTERN  V~M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  DELAY  BY  PERSONNEL  TYPE'; 
TITLE2  F-TRIPLEX  'OFF-EQUIPMENT'; 

FOOTNOTE1  F-NONE  'AIRCRAFT  <  —  >  F-16'I 
PROC  GCHART; 

BY  TNUM; 

PIE  PERSON/SUMVAR  -  DELNUM 
PCT  -  OUTSIDE; 

RUN; 


D- 


[•] 


Iff  WW  WHUPMWMWffWlBW  I'  l*  V  MWW  »"  «.*  HJU*  WV  ^  HA  M.»XF ■  WXT WWWIWWr-TOTOnfllira 


FILENAME  IN89  ’[G0RNT0C.SASjF4GTAPE89.DAT'; 

DATA  TAPE89; 

INFILE  IN89; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  AGE  $  25-27 
TIME  30-34  DELNUM  40*41; 

RUN; 

_ _ _ _ _ _ _ k 

THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  DELAY  TIME  BY  AGE  TYPE 
A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  AND  DAY 

If _ • 

» 

PROC  SORT;  BY  TNUM  DAY  AGE; 

PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  ’ON-EQUIP  DELAY  TIME  BY  DAY/TRIAL'; 

TITLE2  F« TRIPLEX  ’CAUSED  BY  AGE  TYPE'; 

FOOTNOTE 1  F“ ITALIC  'AIRCRAFT  <— >  F-4G'; 

SYMBOL1  W-l  1“ JOIN  V-STAR;  « 

PROC  GPLOT ; 

BY  TNUM  DAY; 

PLOT  TIME  *  AGE  -1; 

RUN; 

Vf _ — _ _ _ * 

I  THIS  SECTION  WILL  PRODUCE  PIE  CHARTS,  I 

THE  SLICES  WILL  CORRESPOND  TO  AGE  TYPE 
WITH  EACH  NEW  PIE  CORRESPONDING  TO  THE  DAY 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  ’NUMBER  OF  DELAY  BY  AGE  TYPE'; 
TITLE2  F-TRIPLEX  'ON-EQUIPMENT'; 

FOOTNOTE1  F-COMPLEX  'AIRCRAFT  <  — >  F-4G’; 

PROC  GCHART ; 

BY  TNUM; 

PIE  AGE/SUMVAR  -  DELNUM 

PCT  -  OUTSIDE; 

RUN; 


Ml 


FILENAME  IN90  '[GORNTOC.SASJF4GTAPE90.DAT'; 

DATA  TAPE90; 

INFILE  IN90; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  AGE  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 

* _ * 

THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  DELAY  TIME  BY  AGE  TYPE 
A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  AND  DAY 

i  r _ — - - - - - - - — - — - 1 : 


PROC  SORT;  BY  TNUM  DAY  AGE; 

PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLEl  F-XSWISS  'OFF-EQUIP  DELAY  TIME  BY  DAY/TRIAL 1 ; 
TITLE2  F-TRIPLEX  'FOR  AGE  TYPE'; 

FOOTNOTE1  F-ITALIC  'AIRCRAFT  <— >  F-4G' ; 

SYMBOLl  W-l  I* JOIN  V-STAR; 

PROC  GPLOT ; 

)  BY  TNUM  DAY; 

PLOT  TIME  *  AGE  -1; 

RUN; 

is _ — - — - —  —  —  —  * 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 

THE  SLICES  WILL  CORRESPOND  TO  AGE  TYPE 
WITH  EACH  NEW  PIE  CORRESPONDING  TO  THE  DAY 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLEl  F*=XSWISS  'NUMBER  OF  DELAY  BY  AGE  TYPE'; 
TITLE2  F- TRIPLEX  'OFF-EQUIPMENT'; 

FOOTNOTE1  F-COMPLEX  'AIRCRAFT  <— »  F~4G’; 

PROC  GCHART; 

BY  TNUM; 

PIE  AGE/SUMVAR  -  DELNUM 
PCT  -  OUTSIDE; 

RUN; 
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FILENAME  IN91  ' [G0RNT0C.SASlF4GTAPE91.DAT'; 

DATA  TAPE91; 

INFILE  IN91; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  $  20  PART  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 

★ —  — - — - - - - - - ★ 

THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  DELAY  TIME  BY  PART  NO. 

A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  AND  DAY 

U - - - - * _ _ _ _ _ _ _ _ _ U 


PROC  SORT;  BY  TNUM  DAY  PART; 

PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'DELAY  TIME  BY  DAY /TRIAL' ; 

TITLE2  F-TRIPLEX  'FOR  PART  NUMBER'; 

FOOTNOTE  1  F“ ITALIC  'AIRCRAFT  <— >  F-4G'; 

SYMBOL1  W«1  1-JOIN  V-STAR;  < 

PROC  GPLOT ; 

BY  TNUM  DAY; 

PLOT  TIME  *  PART  -1; 

RUN; 

>'c - — _ _ _ -k 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 

THE  SLICES  WILL  CORRESPOND  TO  PART  NUMBER 
WITH  EACH  NEW  PIE  CORRESPONDING  TO  THE  DAY 

•< - If  • 

* 

PATTERN  V=M5; 

GOPTIONS  NOTEXT82; 

TITLEI  F-XSWISS  'NUMBER  OF  DELAY  BY  AGE  TYPE'; 

FOOTNOTE  1  F-COMPLEX  'AIRCRAFT  <  — >  F-4G'; 

PROC  gchart; 

BY  TNUM; 

PIE  PART/SUMVAR  -  DELNUM 
PCT  -  OUTSIDE; 

RUN; 


FILENAME  IN92  '[G0RNT0C.SAS3F4GTAPE92.DAT'; 

DATA  TAPE92; 

INFILE  IN92; 

INPUT  TNUM  $  5-6  DAY  $  12-13  8ASENUM  $  20  SHOP  $  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 

* _ * 

THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  DELAY  TIME  BY  SHOP  NO. 

A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  AND  DAY 

i ' _ _ _ _ _ . _ r 


PROC  SORT;  BY  TNUM  DAY  SHOP; 

PATTERN  V-M5 ; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'ON-EQUIP  DELAY  TIME  BY  DAY/TRIAL ' ; 
TITLE2  F-TRIPLEX  'FOR  SHOPS'; 

FOOTNOTE1  F-ITALIC  'AIRCRAFT  <—>  F-4G'; 

SYMBOL1  W-l  1“ JOIN  V-STAR; 

PROC  GPLOT ; 

BY  TNUM  DAY; 

PLOT  TIME  *  SHOP  -1; 

RUN; 

_ ... - .................. - ............. - ★ 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 

THE  SLICES  WILL  CORRESPOND  TO  AGE  TYPE 
WITH  EACH  NEW  PIE  CORRESPONDING  TO  THE  DAY 

ir _ _i  t 


PATTERN  V-M5; 

GOPTIONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  DELAY  BY  SHOP  NUMBER’; 
TITLE2  F-TRIPLEX  'ON-EQUIPMENT'; 

FOOTNOTE  1  F-COMPLEX  'AIRCRAFT  <— >  F~4G' ; 

PROC  GCHART; 

BY  TNUM; 

PIE  SHOP/SUMVAR  -  DELNUM 
PCT  -  OUTSIDE; 


RUN; 


FILENAME  IN93  '  [GORNTOC. SAS] F4GTAPE93 . DAT  '  ; 

DATA  TAPE93: 

INFILE  IN93; 

INPUT  TNUM  $  5-6  DAY  $  12-13  BASENUM  S  20  SHOP  5  25-27 
TIME  30-34  DELNUM  40-41; 

RUN; 

* _ * 

THIS  SECTION  WILL  PRODUCE  X-Y  PLOTS 
OF  DELAY  TIME  BY  SHOP 

A  NEW  PLOT  WILL  BE  DRAWN  FOR  EACH  TRIAL  AND  DAY 

1  I _ _ _ _ _ K 


* _ * 

THIS  SECTION  WILL  PRODUCE  PIE  CHARTS, 

THE  SLICES  WILL  CORRESPOND  TO  SHOP  NUMBER 

WITH  EACH  NEW  PIE  CORRESPONDING  TO  THE  DAY 
_ _ _ _ _ ^ 

PATTERN  V-M5; 

GOP T IONS  NOTEXT82; 

TITLE1  F-XSWISS  'NUMBER  OF  DELAY  BY  SHOP  NUMBER'; 

TITLE2  F-TRIPLEX  'OFF-EQUIPMENT'; 

FOOTNOTE1  F-COMPLEX  'AIRCRAFT  <— >  F-4G’; 

PROC  GCHART; 

BY  TNUM; 

PIE  SHOP/SUMVAR  -  DELNUM 
PCT  -  OUTSIDE; 

RUN; 


PROC  SORT;  BY  TNUM  DAY  SHOP; 

PATTERN  V-M5; 

GOPT IONS  NOTEXT82; 

TITLE1  F-XSWISS  'OFF-EQUIP  DELAY  TIME  BY  DAY/TRIAL’; 
TITLE2  F-TRIPLEX  ’FOR  SHOPS’; 

FOOTNOTE  1  F- ITALIC  ‘AIRCRAFT  «-->  F-4G’ ; 

SYMBOL1  W-l  I-JOIN  V-STAR; 

PROC  GPLOT ; 

BY  TNUM  DAY; 

PLOT  TIME  *  SHOP  -1; 

RUN; 
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